Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#15

Re: Record zurücksetzen (löschen)

  Alt 14. Sep 2008, 12:46
Du beweist, dass man jedes noch so simple Problemchen derart verunstalten kann, dass es eventuell nicht mal richtig funktioniert.

Delphi-Quellcode:
  MyRecord.nr := 1;
  MyRecord.name := 'XYZ';
  memo2.Lines.Add(IntToStr(MyRecord.nr));
  memo2.Lines.Add('*'+MyRecord.name+'*');
  memo2.Lines.Add('');
  FillChar (MyRecord,SizeOf (MyRecord),0);
  memo2.Lines.Add(IntToStr(MyRecord.nr));
  memo2.Lines.Add('*'+MyRecord.name+'*');
Das ergibt das im Anhang.
Miniaturansicht angehängter Grafiken
unbenannt_328.jpg  
Gruß
Hansa
  Mit Zitat antworten Zitat