Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#2
  Alt 5. Dez 2002, 11:46
Hallo Megabyte,

ich würde das in die OnActivate Methode packen, damit es aber nur bei der ersten Aktivierung ausgeführt wird, benutze ich eine Variable FirstTime: Boolean, die in OnCreate auf True gesetzt wird, dann kann man bei OnActivate folgendes machen:

Delphi-Quellcode:
if FirstTime then
begin
  FirstTime := False;
  MyTable.Open;
  MyTable.Append
end
else ...
Dem OnNewRecord Event der TTable erklärt man jetzt, welche Daten vorzubesetzen sind:

Delphi-Quellcode:
  MyTableFeld1.AsString := 'Blabla';
  MyTableFeld2.AsInteger := 17;
Damit ist die Tabelle automatisch im Edit Mode und die Felder sind vorbesetzt.

Denke eventuell daran bei OnClose die Tabelle zu schließen und ggf. FirstTime wieder auf True zu setzen.
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat