wie breche ich einen druck ab ?

[Dax]

Machs doch so:

Delphi-Quellcode:

procedure blablabla.blaDruckClick(Sender: TObject);
begin
   if (bla.field.Value <> Null) then
   begin
      if PrintAuftrag.Execute then
      begin
        Application.CreateForm(TFormblubb,Formblubb);
        Formblubb.QRblubbreport.Print;
        Formblubb.Release;
      end;
   end;
end;