Morgen!
An der letzten Zeile weigert sich der Compiler den Typecast + Dereferenzierung von M durchzuführen. Früher, in ähnlichen Fällen, hat es wunderbar jeklappt. Fehlermeldung: UNGÜLTIGE TYPENUMWANDLUNG. Woran könnte das liegen?
Vielen Dank!
Hier ist der Codeausschnitt:
Delphi-Quellcode:
procedure pm1(M: pDouble; rowM, colM: integer; str: array of char);
type darray = array of double;
var i,j: integer;
begin
assignfile(stream,'c:\\larylog.txt');
append(stream);
writeln('*temp. LOGFILE*\n');
writeln('------------ %s --------------\n', str);
for i:=1 to rowM do
begin
writeln('[%d][x] = ',i);
for j:=1 to colM do
begin
writeln( '%5.4f ', darray (M^)[ i*(colM+1) + j]);
....
....