Thema: Delphi array [0..0] ?

Einzelnen Beitrag anzeigen

nitschchedu

Registriert seit: 24. Mär 2006
300 Beiträge
 
Delphi 7 Professional
 
#9

Re: array [0..0] ?

  Alt 31. Aug 2007, 16:03
Diese Zuweißung geht nicht wirklich
PInfo:=@InfoList.WLAN_Interface_Info; Mein Code:
Delphi-Quellcode:
 Pndu_WLAN_AVAILABLE_NETWORK_LIST = ^Tndu_WLAN_AVAILABLE_NETWORK_LIST;
  PPndu_WLAN_AVAILABLE_NETWORK_LIST = ^Pndu_WLAN_AVAILABLE_NETWORK_LIST;
  Tndu_WLAN_AVAILABLE_NETWORK_LIST = record
     dwNumberOfItems: DWORD;
    dwIndex: DWORD;
    Network: array[0..0] of Tndu_WLAN_AVAILABLE_NETWORK;
  end;



var
 netzworklist: Pndu_WLAN_AVAILABLE_NETWORK_LIST;
 Netzwork: Tndu_WLAN_AVAILABLE_NETWORK;
begin
....
  netzworklist := WlanAllocateMemory(SizeOf(Tndu_WLAN_AVAILABLE_NETWORK_LIST));

  back := WlanGetAvailableNetworkList(hClient,
     @pInterface.InterfaceInfo[0].InterfaceGuid,
    //NDU_WLAN_AVAILABLE_NETWORK_INCLUDE_ALL_ADHOC_PROFILES,
    0,
    nil, netzworklist);


  Netzwork := @netzworklist^.Network; <---

  for i := 0 to netzworklist^.dwNumberOfItems - 1 do
  begin
     Memo1.Lines.Add(Netzwork.strProfileName);
    inc(Netzwork);
  end;
Fehler beim "<---" = Inkompatiple Typen
Programmieren ..... .
  Mit Zitat antworten Zitat