On Dec 6, 2007, at 04:36, Wilfried Mestdagh wrote:
> procedure FreeAndNil(var Obj: TObject);
> begin
> Obj.Free;
> Obj := nil;
> end;
begin
if (Obj <> Nil) Then
Obj.Free;
Obj := Nil;
End;
> LongWord is a Cardinal
This is correct.
dZ.
--
To uns
On Dec 6, 2007, at 04:36, Wilfried Mestdagh wrote:
> from the top of my head (could be wrong for the TagMsg):
>
> procedure FreeAndNil(var Obj: TObject);
> begin
> Obj.Free;
> Obj := nil;
> end;
>
> LongWord is a Cardinal
> TagMsg is TMessage
I don't know in D2, but in D5+ TMessage is
Hello Ron,
from the top of my head (could be wrong for the TagMsg):
procedure FreeAndNil(var Obj: TObject);
begin
Obj.Free;
Obj := nil;
end;
LongWord is a Cardinal
TagMsg is TMessage
---
Rgds, Wilfried [TeamICS]
http://www.overbyte.be/eng/overbyte/teamics.html
http://www.mestdagh.biz
Are there some conditional defines missing from this unit? Delphi 2
errors on defines for FreeAndNil, Longword and TagMsg.
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.ov