Einzelnen Beitrag anzeigen

Benutzerbild von _frank_
_frank_

Registriert seit: 21. Feb 2003
Ort: Plauen / Bamberg
922 Beiträge
 
Delphi 3 Professional
 
#13

Re: [RTTI] setzen von klasseneigenschaften

  Alt 19. Jul 2006, 16:08
Hallo,
also ich hab mal das versucht umzusetzen, jedoch bekomme ich bei meinen Versuchen immer eine AV...

hier mal mein code:

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var ti:PTypeinfo;
    pi:PPropinfo;
begin
  ti:=Typeinfo(TMemo);
  pi:=GetPropInfo(ti,'Lines');
  setOrdProp(memo2.lines,pi,integer(@memo1.lines));
end;
das ganze soll nur ein beispiel sein um memo1.lines nach memo2.lines zu kopieren...später ist natürlich alles variabel...

Hoffe jemand kann mir helfen...

Gruß Frank
  Mit Zitat antworten Zitat