Totale Pointer-Verwirrung

[rowkajjh]

Zitat von Der Jan:

Vielleicht hilft dir das weiter (ungetestet)

Delphi-Quellcode:

type
  TMap = array of double;   //Feld von doubles
  pTMap = ^TMap;            //Zeiger auf eben jenes
  TMaps = array of pTMap;   //Feld von Zeigern

Geil, geht

Noch ein letztes. Eigentlich müßte doch die Konvertierung char -> double problemlos sein, oder? Aber leider:

Procedure TImgProc.UC2double(outmap : integer; img : PChar; pitch : Integer);
var
x,y : Integer;
line : PChar;
srcline: pTLayer;
src : pTLayer;
begin
if(pitch =-1) then pitch:=FWidth;

for y := 0 to FHeight do
begin
line := img + y*pitch;
srcline := FMap[outmap];
for x := 0 to FWidth do
begin
src := srcline;
Inc(src,x);
src^[x] := line[x]; // <-- Incompatible types: 'Double' and 'char'
end;
end;
end;

Häh?