Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.230 Beiträge
 
Delphi 12 Athens
 
#14

Re: Einem Array of WChar einen String zuweisen

  Alt 10. Dez 2003, 16:44
Ein Hallöle von http://www.FrankNStein.de/Smiley-Wolke2.gif,

also dan so:
Code:
  XcvData(
[color=gray]*[/color]  HANDLE hXcv,
[color=gray]*[/color]  LPCWSTR pszDataName,
[color=gray]*[/color]  PBYTE  pInputData,
    DWORD  cbInputData,
[color=gray]*[/color]  PBYTE  pOutputData,
    DWORD  cbOutputData,
[color=gray]*[/color]  PDWORD pcbOutputNeeded,
[color=gray]*[/color]  PDWORD pdwStatus)

  XcvData(
[color=gray]*[/color]  hXcv,
[color=gray]*[/color]  @DataName,
[color=gray]*[/color]  @InputData,
    SizeOf(InputData),
[color=gray]*[/color]  @OutputData,
    SizeOf(OutputData),
[color=gray]*[/color]  @OutputNeeded,
[color=gray]*[/color]  @dwStatus)

[color=gray]*[/color] = Zeiger
z.B.:
Delphi-Quellcode:
Const MAX_DATANAME = XXX; {weiß nicht wie lang es sein muß}

Var DataName: Array[0..MAX_DATANAME - 1] of WideChar;

StringToWideChar('AddPort', @DataName, Min(Length('AddPort') + 1, MAX_DATANAME));

XcvData(
  hXcv,
  @DataName,
  @PortData1,
  SizeOf(PortData1),
  nil, 0, nil,
  @pdwStatus)

http://www.FrankNStein.de/Smiley-Kuss.gif http://www.FrankNStein.de/Smiley-Spinne.gif http://www.FrankNStein.de/Smiley-Winken.gif
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat