Forum: Sonstige Fragen zu Delphi
Delphi
by MaPaPiap,
12. Nov 2003
Hallo nochmal zusammen,
leider zu früh gefreut!
Nachdem ich folgenden Code ergänzt habe procedure TQRPreviewForm.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
QRPreview1.Free;
end;
läßt sich mein Programm zwar beenden, aber ich kann die Vorschau nur einmal aufrufen.Beim zweiten Aufruf erfolgt eine EAccessViolation in der unten markierten Zeile. Wenn ich diese Zeile...
Forum: Sonstige Fragen zu Delphi
Delphi
by MaPaPiap,
11. Nov 2003
Ich muß erst "create"n bevor ich mit QRPrinter arbeiten kann.
Aber MrKnogge hat genau die richtige Frage gestellt: :wall:
Mit
procedure TQRPreviewForm.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
QRPreview1.Destroy;
end;
funktioniert es.
Ich weiß zwar nicht genau warum :gruebel: aber es klappt! :bounce1:
Forum: Sonstige Fragen zu Delphi
Delphi
by MaPaPiap,
11. Nov 2003
Da schließe ich nur den ComPort.
Ich habe aber dort schon einen Breakpoint gesetzt: Der wird aber nicht erreicht.
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ComPort1.close;
end;
OnClose der Vorschau benutze ich nicht.
Ich vermute ich muß noch irgend etwas beenden oder schließen, aber was?
Forum: Sonstige Fragen zu Delphi
Delphi
by MaPaPiap,
11. Nov 2003
Hallo Hilfe,
wenn ich aus meinem Programm mit dem Code:
procedure TForm1.DruckvorschauClick(Sender: TObject);
begin
with TQRPrinter.Create do
begin
Printerindex := -1;
QRForm1.QuickRep.Page.PaperSize := PaperSize;
Free;
end;