Einzelnen Beitrag anzeigen

HaJo

Registriert seit: 28. Apr 2004
Ort: Würselen
140 Beiträge
 
Delphi 8 Enterprise
 
#9

Re: Auf Memo Zeilen Zugreifen

  Alt 14. Feb 2009, 00:34
Hallo Alex,

den Zugriff auf ein dbMemofeld kannst Du z.B. über eine For-schleife vornehmen:


Delphi-Quellcode:
   
VAR
   I,
   MeineZeile : INTEGER;
   MeinText : STRING[255];
BEGIN
   MeineZeile := 9 // Deine zu lesende Zeile 10 :-)
   MeinText :=''; // Variable sollten immer initialisiert werden
   
   for I := 0 to MeineForm.dbMemo1.Lines.Count - 1 do
      begin
         forms.Application.ProcessMessages; // nur wenn Du beim lesen zusehen möchtest
         IF (I = MeineZeile) THEN
            BEGIN
               MeinText := MeineForm.dbMemo1.Lines[I]);
               Break; // gelesen also raus hier
            END;
      end;
END;
@Alex:
Man darf aber auch die Delphi-Hilfe ab und an bemühen:
Zitat:
In diesem Beispiel wird ein Formular mit einer Schaltfläche und einer Memokomponente verwendet. Wenn der Benutzer auf die Schaltfläche klickt, wird der Inhalt der Datei AUTOEXEC.BAT in die Memokomponente geladen und die sechste Zeile der Datei am oberen Rand des Formulars angezeigt.

procedure TForm1.Button1Click(Sender: TObject);

begin
Memo1.Lines.LoadFromFile('C:\AUTOEXEC.BAT');
Writeln('The 6th line of AUTOEXEC.BAT is: ', Memo1.Lines[5]);
end;
@mkinzler:
Sorry, aber Deine Art zu antworten sorgt hier meist für die Seitenlangen Frage- und Antwortspiele.
Deine Art mit Einzeilern zu antworten ist eher kontraproduktiv und wirft meist mehr Fragen auf statt zu helfen.
Hans-Joachim Brosius
  Mit Zitat antworten Zitat