variants in klasse zuweisen

[marabu]

Hallo thomasch,

wenn du beim Aufruf so vorgehst, dann dürfte es keine Probleme geben:

Delphi-Quellcode:

var
  st: cSetzTyp;
begin
  st := cSetzTyp.Create;
  st.SetTyp1;
  st.Free;
end;

Grüße vom marabu

PS: Für Delphi ungewöhnliche Namenskonvention...