Einzelnen Beitrag anzeigen

grayfox

Registriert seit: 22. Jan 2003
Ort: Litschau
173 Beiträge
 
Delphi 4 Standard
 
#2

Re: Über ButtonClick in Datenbank schreiben...

  Alt 22. Jan 2004, 16:09
hallo sulustaner!

am einfachsten so:
Code:
{$UNTESTED}
procedure ButtonClick(Sender: TObject);
var
   i: ShortInteger;
begin
  for i:= 1 to 25 do
    FindComponent('Edit' + IntToStr(i)).Text:= Table1.Fields.Fields[i].asString;
end;
... vorausgesetzt, dass die tabellenfelder in der reihenfolge angeordnet sind, in der du sie angezeigt haben willst.
was anderes... warum nimmst denn keine datasource und DBEdit-Felder? das wär dann viel einfacher.

mfg, stefan
  Mit Zitat antworten Zitat