Einzelnen Beitrag anzeigen

Helld_River

Registriert seit: 2. Jan 2003
Ort: Hürth
136 Beiträge
 
Delphi 2010 Professional
 
#6

Re: DBGrid an Memo übergeben

  Alt 19. Aug 2003, 14:13
Hi !
Ich weiss jetzt nicht, ob ich dich richtig verstanden habe:
Du möchtest einfach die Felder, welche Du in eine DBGrid angezeigt bekommst der REihe nach in ein Memo schreiben, richtig ?

Also:
Ich habe mal
- ein Memo
- eine Table
- eine DataSource
- ein DBGrid
auf meinem Formular.

Alles miteinander verknüpft !(denke, da brauche ich jetzt nicht näher darauf einzugehen, oder?)

Hier der Code zum schreiben der Daten aus dem DBGrid in das Memo:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var x : integer;
    str : string;
begin
  Table1.First;
  while not(Table1.eof) do
  begin
    str:='';
    for x := 0 to DBGrid1.FieldCount-1 do
    begin
      str:=str+DBGrid1.Fields[x].AsString+';';
    end;
    Memo1.Lines.Add(str);
    Table1.Next;
  end;
end;
Hoffe, das hilft dir weiter !

Gruß, Helld
  Mit Zitat antworten Zitat