Mir ist kein anderen threadnamen eingefallen.
Meine Funktion welche ich hier schonmal gepostet habe verursacht in D2009 beim 2 Aufruf ein
Exception Exception in "blaaa, blaa" aufgetreten.
Delphi-Quellcode:
procedure TSkinConfig.AppendToLinkedList(nReading: Integer; sBuffer:
string);
begin
New(FPBuffer);
if nReading = 0
then
Begin
New(FToPBuffer);
LineStart := FToPBuffer;
end;
FPBuffer^.Nr := nReading;
FPBuffer^.Str := sBuffer;
LineStart^.Max := nReading;
FToPBuffer^.Ptr := FPBuffer;
FToPBuffer := FPBuffer;
end;
procedure TSkinConfig.FBuffin(FileName:
string);
var
sBuffer:
string;
begin
if not FExist(FileName)
then
Exit;
try
try
Assignfile(ParseFile, FileName);
reset(ParseFile);
while not eof(ParseFile)
do
begin
ReadLN(ParseFile, sBuffer);
AppendToLinkedList(nReading, sBuffer);
inc(nReading);
end;
except
raise Exception.Create(SysErrorMessage(GetLastError));
end;
finally
nReading := 0;
CloseFile(ParseFile);
end;
end;
und zwar wenn das zweitemal
New(FPBuffer);
aufgerufen wird.
Beim Awendungsfenster tritt das problem nicht auf nur beim
Modal erstellten Window.
In D2006 gibt es keine probleme diesbezüglich.
Mit
Exception Exception kann ich nichts anfangen keine Nummer nix wird zurückgegeben.
gruss Emil