Forum: Win32/Win64 API (native code)
Delphi
by Chewie,
1. Jul 2003
Ach, verdammt, wieder so ein einfacher Fehler. Ich muss mich schämen. Der Fehler lag nicht an der Adresse, sondern daran, dass ich das Feld mit der Adresse gar nicht anfordere.
Folgendermaßen muss ich natürlich das Feld lParram holen:
with PNMHdr(lParam)^ do
begin
//falls es das Listview war...
if hWndFrom = hIncIPView then
begin
Forum: Win32/Win64 API (native code)
Delphi
by Chewie,
1. Jul 2003
Nein, natürlich nicht :oops: :duck:
Natürlich erst, wenn ich auf ein Element des Records zugreife:
PacketRec := PPacketRec(LVItem.lParam);
if PacketRec <> nil then
begin
ShowErrorMsg(PacketRec.srcHost, 'Hinweis', hWnd);
end
else ShowErrorMsg('Keine Daten', 'Fehler', hWnd);
Forum: Win32/Win64 API (native code)
Delphi
by Chewie,
30. Jun 2003
Das bringt auch nix.
Ich hab mich etwas missverständlich ausgedrückt. Also hier die Deklaration:
type
TPacketRec = packed record
{...}
end;
PPacketRec = ^TPacketRec;
Forum: Win32/Win64 API (native code)
Delphi
by Chewie,
30. Jun 2003
Ich komm gerade nicht weiter. Ich speichere in einer Integer-Variable die Adresse eines Records (zumindest hoffe ich das):
LVItem.mask := LVIF_TEXT or LVIF_PARAM;
LVItem.iItem := rowIndex;
LVItem.iSubItem := 0;
GetTimeFormat(LOCALE_SYSTEM_DEFAULT, 0, @PacketRec.inTime, 'HH:mm:ss', @curTime, Length(curTime));
LVItem.pszText := @curTime;
LVItem.lParam :=...