NativeInt to string

[venice2]

Zitat von himitsu:

Zitat:

Result := LONG_PTR(SplitProperty[2])

Das wird der Zeiger auf den String, in dem die "Zahl" als Text drin steht, oder nicht?

Für mich wird hier ein NativeInt Datentyp zurückgegeben vielleicht verstehe ich dich auch nicht.

So funktioniert es nun bis das nächste Problem auftaucht.

Delphi-Quellcode:

function TSkinListBox.GetProperty(WinHandle: hWnd; Item: Integer): LONG_PTR;
var
  SplitProperty: TSplitStrArray;
  IntI: Integer;
begin
  Result := 0;

  if (Item > 0) and (WinHandle <> 0) then
  begin
    for IntI := 0 to PropList.Count - 1 do
    begin
      SplitProperty := Split(PropList.Strings[IntI], ',');
      if SplitProperty[0] = IntToStr(WinHandle) then
      begin
        Result := LONG_PTR(StrToInt64(SplitProperty[2]));
        exit;
      end;
    end;
  end;

end;

Danke