Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
12. Aug 2008
Schau an, das war mir neu. Danke für die Erläuterung :thumb:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
12. Aug 2008
Nochmal:Die Funktion hat keinen Rückgabewert.
Ohne ein WsList := TObjectList.Create davor wohl eher nicht :stupid:
MyWorkstation := WsList as Model.TWorkstation; // der Fehler sollte nun weg sein
Aber ich würde die Listen als Parameter übergeben, das mindert die Gefahr von Speicherlecks.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
12. Aug 2008
*Uhh*, Listen als Funktionsrückgabewert, Funktionen ganz ohne Rückgabewert, fehlendes Instanziieren von Listen... ich steig da nicht mehr richtig durch.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
8. Aug 2008
:shock: Die letzte Person, bei der mir das häufiger passiert ist, habe ich geheiratet. :-D
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
8. Aug 2008
Ich finde es nur witzig, dass der Wortlaut haargenau übereinstimmt :zwinker:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
8. Aug 2008
Mal abgesehen davon, dass ich eine Liste nicht als Funktionsrückgabewert definieren würde: TList ist eine Liste von Pointern. Das sind zwar intern 32-Bit-Integer, trotzdem musst Du casten.List.Add(Pointer(SQLQuery.FieldByName('WorkstationID')));
P.S.: Wo ist eigentlich das TList.Create? Hab ich das übersehen?