Re: [lazarus] delphi-lazarus Pointer vs. TObject

2006-03-06 Thread Christian Iversen
On Monday 06 March 2006 15:59, Friedrich Hattendorf wrote: > Am Sonntag, 5. März 2006 22:48 schrieb Friedrich Hattendorf: > > is there a general Problem or is it only too lat to wriet programs ;-) > > > > Friedrich > > Thanks & sorry > It had been too late to write programs; > > {$MODE Delphi} > is

Re: [lazarus] delphi-lazarus Pointer vs. TObject

2006-03-06 Thread Christian Iversen
On Monday 06 March 2006 15:59, Friedrich Hattendorf wrote: > (next Problem -> GetTickCounter / LCLLinux in a new Thread) What's the problem with GetTickCounter? -- Regards, Christian Iversen _ To unsubscribe: mail [EMAIL PROTE

Re: [lazarus] delphi-lazarus Pointer vs. TObject

2006-03-06 Thread Friedrich Hattendorf
Am Sonntag, 5. März 2006 22:48 schrieb Friedrich Hattendorf: > is there a general Problem or is it only too lat to wriet programs ;-) > > Friedrich Thanks & sorry It had been too late to write programs; {$MODE Delphi} is the solution Friedrich (next Problem -> GetTickCounter / LCLLinux in a n

Re: [lazarus] delphi-lazarus Pointer vs. TObject

2006-03-06 Thread Mattias Gaertner
On Mon, 6 Mar 2006 06:18:28 +0100 "Christian U." <[EMAIL PROTECTED]> wrote: > > type > > TListenStruktur = class (TObject) > >private > > hListe: TList; > > AktuellePosition: Integer; > > ... > > > > and a function > > > > function TListenStruktur.GetElement: TObject; > > begin > >

Re: [lazarus] delphi-lazarus Pointer vs. TObject

2006-03-05 Thread Christian U.
type TListenStruktur = class (TObject) private hListe: TList; AktuellePosition: Integer; ... and a function function TListenStruktur.GetElement: TObject; begin if not IsEmpty then GetElement := hListe.Items[AktuellePosition] end; hListe.Items^[AktuellePosition] ist richtiger

Re: [lazarus] delphi-lazarus Pointer vs. TObject

2006-03-05 Thread Vincent Snijders
Friedrich Hattendorf wrote: Still trying to convert a delphi-Program to lazarus I declared type TListenStruktur = class (TObject) private hListe: TList; AktuellePosition: Integer; ... and a function function TListenStruktur.GetElement: TObject; begin if not IsEmpty then

[lazarus] delphi-lazarus Pointer vs. TObject

2006-03-05 Thread Friedrich Hattendorf
Still trying to convert a delphi-Program to lazarus I declared type TListenStruktur = class (TObject) private hListe: TList; AktuellePosition: Integer; ... and a function function TListenStruktur.GetElement: TObject; begin if not IsEmpty then GetElement := hListe.Items[