Fehler: Undefinierter Bezeichner! Wo liegt das Problem?

[AlexII]

Die Aufnahme wird hier sofort gestartet sobald ein Radio-Sender läuft. Muss aber nur dann starten wenn man auf einen AufnahmeButton klickt.

Delphi-Quellcode:

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) {and (RecordStatus=True)} then
      Form1.StopRec;
  if (buffer = nil) {or (RecordStatus=False)} then
      FileStream.Free // finished downloading
   else
      FileStream.Write(buffer^, len);
end;

Hab schon so versucht, aber irgendwie klappt das nicht.

Delphi-Quellcode:

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) and (RecordStatus=True) then
      Form1.StopRec;
  if (buffer = nil) or (RecordStatus=False) then
      FileStream.Free // finished downloading
   else
      FileStream.Write(buffer^, len);
end;


procedure TForm1.Button1Click(Sender: TObject);
begin
RecordStatus:=True; //Start
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
RecordStatus:=False; //Stopp
end;