Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Object wird manchmal nicht erzeugt

  Alt 13. Mai 2020, 13:19
Hallo,

procedure TDBSettings.AssignTo(Dest: TObject);
var
sDestClassName: String;
begin
sDestClassName:= Dest.ClassName; // Test, ob hier MadExcept was anzeigt

if Dest is TDBSettings then
Heiko
  Mit Zitat antworten Zitat