Aus Textdatei ins ListIconGadget?

Für allgemeine Fragen zur Programmierung mit PureBasic.
Benutzeravatar
satzzeichen
Beiträge: 34
Registriert: 22.05.2005 13:59
Wohnort: Rötha bei Leipzig
Kontaktdaten:

Aus Textdatei ins ListIconGadget?

Beitrag von satzzeichen »

Hallo,

ich würde gerne eine Zeile Text in ein ListIconGadget übertragen, leider weis ich nicht so recht, wie ich es anstellen soll, dass die Wörter, die durch ein Chr(10) getrennt sind in die jeweils verschiedenen Spalten eingeordnet werden.

Code: Alles auswählen

If FL

  While Eof(FF)=0
    test$ + ReadString(); + #CRLF$
  Wend

  CloseFile(FL)
  SetGadgetItemText(0, 5, test$, 1)
Else
  MessageRequester("", "Die Datei konnte nicht geladen werden.")
EndIf 
So in etwa könnt ich es mir vorstellen, aber keinen Erfolg damit. Was mache ich falsch?! Wie krieg ich das hin? Bitte helft mir!

Euer Satzzeichen
Der erhabene Geist schafft am meisten, wenn er am wenigsten Arbeitet. Leonardo da Vinci

Ich hätte nie gedacht, dass es soviele Fette gibt. Da kann man ja noch was lernen. G. Schröder
Benutzeravatar
Batze
Beiträge: 1492
Registriert: 03.06.2005 21:58
Wohnort: Berlin
Kontaktdaten:

Beitrag von Batze »

PB-Hilfe hat geschrieben: Wenn Sie mittels AddGadgetItem() zu einem ListIcon mit mehreren Spalten Inhalte hinzufügen möchten, verwenden Sie das Format "Erste Spalte"+Chr(10)+"Zweite Spalte" als Text$ Parameter. Siehe hierzu auch das untere Beispiel.
Dann solltest du das auch so machen und nicht #CRLF$ verwenden. :freak:
Das ist nämlich soweit ich weiß = Chr(13) + Chr(10)
Hier sind meine Codes (aber die Seite geht gerade nicht):
http://www.basicpure.de.vu
Benutzeravatar
satzzeichen
Beiträge: 34
Registriert: 22.05.2005 13:59
Wohnort: Rötha bei Leipzig
Kontaktdaten:

Beitrag von satzzeichen »

Batze hat geschrieben:
PB-Hilfe hat geschrieben: Wenn Sie mittels AddGadgetItem() zu einem ListIcon mit mehreren Spalten Inhalte hinzufügen möchten, verwenden Sie das Format "Erste Spalte"+Chr(10)+"Zweite Spalte" als Text$ Parameter. Siehe hierzu auch das untere Beispiel.
Dann solltest du das auch so machen und nicht #CRLF$ verwenden. :freak:
Das ist nämlich soweit ich weiß = Chr(13) + Chr(10)
Hmm du hast vergessen, dass ich es mit SetGadgetItemText() anstellen wollte, allerdings merke ich gerade das es doch 100 mal einfacher wäre, es mit AddGadgetItem() zu machen ^^, mal schaun ob ichs hinkrieg, danke!

Gratz Satzzeichen
Der erhabene Geist schafft am meisten, wenn er am wenigsten Arbeitet. Leonardo da Vinci

Ich hätte nie gedacht, dass es soviele Fette gibt. Da kann man ja noch was lernen. G. Schröder
Benutzeravatar
Andre
PureBasic Team
Beiträge: 1765
Registriert: 11.09.2004 16:35
Computerausstattung: MacBook Core2Duo mit MacOS 10.6.8
Lenovo Y50 i7 mit Windows 10
Wohnort: Saxony / Deutscheinsiedel
Kontaktdaten:

Beitrag von Andre »

@satzzeichen: guckste einfach mal in die Hilfe, dort Beispiel 1 beim ListIconGadget. :wink:
Bye,
...André
(PureBasicTeam::Docs - PureArea.net | Bestellen:: PureBasic | PureVisionXP)
Benutzeravatar
satzzeichen
Beiträge: 34
Registriert: 22.05.2005 13:59
Wohnort: Rötha bei Leipzig
Kontaktdaten:

Beitrag von satzzeichen »

Jaaa, :) ich schlies gleich mal ne andere Frage an, um nicht soviele Themen zu machen!

Kann ich irgendwie auszählen, wieviele ZEILEN Text es in einer Datei gibt?
Btw. irgendwie die Zeilenumbrüche feststellen? (Ich meine nicht Eof!)
Der erhabene Geist schafft am meisten, wenn er am wenigsten Arbeitet. Leonardo da Vinci

Ich hätte nie gedacht, dass es soviele Fette gibt. Da kann man ja noch was lernen. G. Schröder
Velz
Beiträge: 182
Registriert: 18.10.2004 22:20

Beitrag von Velz »

Die Anzahl der Zeichen bekommst du beim Öffnen zurück... wenn du also feste Zeilenlängen hat kein Prob...

sonst einfach einmal durchlaufen bis EOF und dabei die Records zählen...

Ich habe zwar noch keine Ahnung von SQL.. aber mit Textfiles und addGadgetitem kenn ich mich aus... wenn du hilfe brauchst.. dann frag..


mfg Uli
Benutzeravatar
Kiffi
Beiträge: 10711
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Beitrag von Kiffi »

> Kann ich irgendwie auszählen, wieviele ZEILEN Text es in einer Datei gibt?

nimm die FastFile-Routinen von Rings aus dem PBOSL-Paket:

Code: Alles auswählen

AnzahlZeilen = FastOpenTextFile(Optional Nr.l, Filename.s, Optional Trennzeichen.s)
Grüße ... Kiffi
a²+b²=mc²
Benutzeravatar
satzzeichen
Beiträge: 34
Registriert: 22.05.2005 13:59
Wohnort: Rötha bei Leipzig
Kontaktdaten:

Beitrag von satzzeichen »

Velz hat geschrieben:Die Anzahl der Zeichen bekommst du beim Öffnen zurück... wenn du also feste Zeilenlängen hat kein Prob...

sonst einfach einmal durchlaufen bis EOF und dabei die Records zählen...
Hab leider keine festgelegte Zeilenlänge :( Wie zähle ich denn die Records mit Eof? Und was ist das?^^
Kiffi hat geschrieben: nimm die FastFile-Routinen von Rings aus dem PBOSL-Paket
Hm die Codezeile schaut ja supi aus, aber woher bekomme ich das Paket?!

Gratz Satzzeichen
Der erhabene Geist schafft am meisten, wenn er am wenigsten Arbeitet. Leonardo da Vinci

Ich hätte nie gedacht, dass es soviele Fette gibt. Da kann man ja noch was lernen. G. Schröder
Velz
Beiträge: 182
Registriert: 18.10.2004 22:20

Beitrag von Velz »

Hei..

erst mal... das mit den Zeichen stimmt für PB nicht.. sorry

Das mit dem Zählen geht so

Code: Alles auswählen

If OpenFile(1,"c:\Text.txt")

      Zeilen=0

      Repeat

      satz$=ReadString()
      Debug satz$
      Zeilen=Zeilen+1

      Until Eof(1)
      Debug Zeilen
      CloseFile(1)

EndIf

End
_______________________________________________

Das PBOSL Paket findest du bei Purearea.net .. der Link ist rechts oben in deinem Browser..

mfg

Edit by Kiffi: Code-Tags gesetzt
Benutzeravatar
Kiffi
Beiträge: 10711
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Beitrag von Kiffi »

> Hm die Codezeile schaut ja supi aus, aber woher bekomme ich das Paket?!

PBOSL gibt's hier: http://pbosl.purearea.net/

@Velz:

Bestehende Dateien öffnet man idealerweise mit [c]ReadFile[/c] und nicht mit [c]OpenFile[/c].

Grüße ... Kiffi
a²+b²=mc²
Antworten