[*Caro*]

Hola, no te entiendo muy bien, tu no quieres que se muestre el cuadro de dialogo es así solo quita esa parte

Código Delphi [-]
function TForm1.Filetext: Boolean;
begin
   Result := true;
   if MemoEditor.Modified then
     begin
       case MessageDlg('Quieres guardar los cambios',
       mtInformation, mbYesNoCancel, 0) of
       mrYes: MemoEditor.Lines.SaveToFile('C:\NombreDeTuArchivo.txt');
      end else
        Result := false;
        mrNo: Result := true;
        mrCancel: Result := false;
       end;
   end;
end;

Saluditos