Forum: Object-Pascal / Delphi-Language
by exasoft,
22. Jan 2019
uups, da habe ich mir wohl die falsche Funktion als Testfunktion ausgesucht. Klar einfach als TControl übergeben ist viel einfacher in dem Fall. Uralter Code. Mich interessiert es halt - deswegen probiere ich jetzt noch bissi rum..
Tks..
Forum: Object-Pascal / Delphi-Language
by exasoft,
22. Jan 2019
Also so:
function TfrmMain.getY<T>(Sender: TObject; AMaster: TLayout): single;
begin
end;
wirds wenigstens kompiliert - und so stehts auch irgendwie im Buch nur, wie behandel ich jetzt <T>?
Forum: Object-Pascal / Delphi-Language
by exasoft,
22. Jan 2019
das funktioniert so aber nicht - da meckert er.
Ich möchte im Prinzip aus einigen "Edit-Controls" im jew. onEnter eine "globale" Funktion aufrufen an die ich "Sender" übergebe. In der Funktion möchte ich auf "Sender.Parent" zugreifen ohne eben den "Sender" abfragen zu müssen "if Sender.ClassType = TEdit... - da dachte ich, dass das vielleicht mit generics geht, weil ja alle entspr. Kompos...
Forum: Object-Pascal / Delphi-Language
by exasoft,
22. Jan 2019
Hey, do solltest Bücher scheiben - das habe sogar ich verstanden.
Tks!
Forum: Object-Pascal / Delphi-Language
by exasoft,
22. Jan 2019
Hi @ALL,
hab mal bissi mit generics rumprobiert und wollte mal testweise eine Funktion umstellen - bekomme es aber nicht hin:
Wenn ich zB:
function TForm1.getY_TEdit(Sender: TObject; AMaster: TLayout): single;
var
stufe: integer;
begin
Result := 0;