Re-hello.
Sorry, I dont catch it; ;(
For example, that code produce the warning pointing to ptruint:
> Conversion between ordinals and pointers is not portable.
procedure tpointeransistringhashdatalist.add(const keys: array of string;
startindex: pointer = pointer($00000001));
var
ca1: longword;
begin
for ca1:= 0 to high(keys) do begin
add(keys[ca1],pointer(ca1+ptruint(startindex)));
end;
end;
____________________________
I am using Linux 64 bit and changed in msetypes.pas
{$ifdef cpu64}
PtrUInt = QWord;
{$else}
PtrUInt = DWord;
{$endif}
But still the warning.
Where is the guilty?
Fre;D
--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/
_______________________________________________
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
