Habe folgenden Code, der folgende Fehlermeldung erzeugt - "Undefinierter Bezeichner: StopRec"
Die procedure ist doch deklariert, wieso dann die Fehlermeldung? Wer kann mir weiter helfen? Danke!
Delphi-Quellcode:
private
{ Private declarations }
procedure StopRec;
procedure StatusProc(buffer: Pointer; len, user: DWORD); stdcall;
begin
if (buffer <> nil) and (len = 0) then
SendMessage(win, WM_INFO_UPDATE, 8, DWORD(PChar(buffer)));
if (FileStream = nil) then
StopRec; <-------
if (buffer = nil) then
FileStream.Free
else
FileStream.Write(buffer^, len);
end;