VarPtr in Delphi ?

[goose33]

Hallöchen,

ging doch blos um den komischen VarPtr. Das ganze Project
das sind mittlerweile umer 10000 Zeilen...ich glaub das fänden die Leute hier nicht wirklich
lustig

Dank Dir aber trotzdem....


es ging ja nur um das hier :

Delphi-Quellcode:

var 
   b : array[0..23] of byte; 
   AcTyp : string; 
begin 

      FSUIPC_Read($3160, 24, @bAc[0], dwResult); 
      FSUIPC_Process(dwResult); 
      for a := 0 to 255 do 
      begin 
        if bAc[a] = 0 then 
          break 
        else AcTyp := AcTyp + Char(bAc[a]); // hier stand PChar() das war falsch
      end; 
      mPhase.Lines.Add('Aircraft2 '+AcTyp);
end;

Matthias