form.print beim zweiten mal alles schwarz???

[yörsch]

Hallo Zusammen,

ich versuch ein Formular (TForm) über MyForm.print zu drucken. beim erstenmal alles OK!

Beim zweitenversuch kommt aus dem Drucker nur eine schwarze Seite raus???

Die Anwendung ist mehrsprachig, hat das damit was zu tun

[mr.unbekannt]

hallo yörsch,

ich denke du müsstest es wieder säubern über einen clear befehl oder sowas. leider habe ich gerade kein delphi hier und kann nicht nachgucken. bei solchen Fehlern ist es immer günstig ein bischen quellcode zu posten!

mfg

[yörsch]

kann ich machen ist aber nicht aussagekräftiger als ohne:

Delphi-Quellcode:

procedure TDatenHM.BtPrintClick(Sender: TObject);
begin
  Print;
end;

Zitat von mr.unbekannt:

säubern über einen clear befehl

hmm??? bei Print erzähl mehr!!!

[mr.unbekannt]

ist dies die print-function von der form oder von einer komponente? gehe mal mit der maus auf das wort print und drücke mal F1, meist steht eine delphi-example in der hilfe und da steht dann meist auch das auflösen des printes. Ich bin heute abend erst wieder zuhause und kann dir dann erst besser antworten, weil ich wie gesagt hier kein delphi habe.

[yörsch]

Zitat von mr.unbekannt:

print-function von der form oder von einer komponente?

eindeutig FORM! ich will ja das ganze formular drucken.
erstmal danke an mr.unbekannt

[yörsch]

Zitat von mr.unbekannt:

du müsstest es wieder säubern über einen clear befehl oder sowas

Delphi-Quellcode:

printer.Orientation:=poLandscape; //Querformat 
PrintScale:=poPrintToFit; //Form auf Querformat vergrößern (zoomen) 
print; //drucken

könnte das sowas wie ein clear befehl sein geht aber auch nicht !
oder hat das doch was mit der mehrsprachigkeit zu tun

[yörsch]

HAI Zusammen,
wir haben im Team mal alles ausprobiert was in DP über TFform.print so steht.
Kein erfolg!

wenn wir die Mehrsprachigkeit ausschalten dann geht´s.

Das kann aber nicht die Lösung sein???
Hat jemand sowas schon gehabt???

[Ghostwalker]

Vor ein paar Jahren hatte ich mal ein ähnliches Problem gehabt. So aus dem Kopf ist mir im Sinn, das das Problem immer dann aufgetreten ist, wenn verschiedenen Sprachen gemischt wurden (Also z.B. Deutsches Programm auf russischem Windows und englischen Druckertreibern). Leider kann ich im Source nicht mehr nachguggen (waren ein externer Auftrag).