Registriert seit: 9. Mai 2006
Ort: Mannheim
142 Beiträge
Delphi XE5 Professional
|
Unterschied Delphi7 und Delphi XE5
6. Nov 2017, 20:34
Hallo,
ich habe ein Problem und hoffe jemand kann mir helfen.
Ich lese Laserintefaces aus (speziell LUMAX).
Dazu benutze ich FTD2XX.dll
und daraus die Funktionen:
s:=LW_CreateDeviceInfoList(adev);
if s = 0 then
begin
if adev > 0 then
begin
ldr1:=@DevLists;
num:=1;
ldr2:=@num;
s:=LW_GetDeviceInfoList(ldr1, ldr2);
if s = 0 then
begin
Damit lade ich die Devlist:
type T_SerNum = record
wsernum: array[0..15] of char;
end;
type T_Descript = record
wdes: array[0..63] of char;
end;
type T_DevList = record
Flags: integer;
dType: integer;
dID: integer;
LocId: integer;
SerialNumber: T_SerNum;
Description: T_Descript;
ftHandle: THandle;
end;
Die beiden Felder SerialNumber und Description sind Type char.
Nun zu meinen Problem.
Wenn ich das Programm mit Delphi7 laufen lassen stehen in den Feldern
SerialNumber und Description vernüftige Werte drin.
>LX2UUK05<
Wenn ich das Programm mit Delphi XE5 laufen lassen stehen in den Feldern
SerialNumber und Description Schrott drin.
>塌唲䭕㔰豈'#$12'弼瞽楍楮畬慭⁸楌桧<
Hat da jemand eine Ahnung?
Danke und Gruß
Jürgen
Jürgen Linder
|