Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Spitze, ich glaub, jetzt hab ich alles. Danke für die tolle Unterstützung!
• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Ups, diese habe ich übersehen. Hab dies nun auch geändert. Jetzt funktioniert es.
  
  Reicht es jetzt mit den Höhenangaben oder muss ich noch etwas berücksichtigen?
  
  Eine Frage hätte ich noch.
  Wenn ich auf Drucken klicke kommt zuerst immer das Windows-Formular, wo ich den Drucker auswählen kann. Gibt es nicht einen Befehl, der gleich auf den Standart-Drucker zugreift, so dass, wenn ich auf...
• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Ich hab mir das Beispiel von den schweizen angesehen und habe Font.Height:=50; eingegeben.
  
  Am Ausdruck ändert sich die Schriftgröße aber NUR in dieser Zeile:
  Printer.Canvas.TextOut(3500,200,DateTimeToStr(now));
  Bei den anderen Codezeilen, wo der Text von der DBEdit.Text stammt, ist die Schriftgröße immer gleich.
• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Ok, da es aber nur Text ist, würden 72 Pixel reichen. Kann man irgendow einstellen, dass er NUR mit der vorgegebenen Auflösung druckt?
• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Danke für die Hilfe, inzwischen hab ich es auch rausgefunden.
  
  Jetzt funktioniert es.
  
  Betreffend der Auflösung versteh ich nicht ganz, was damit gemeint ist.
• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Ok, ich habs nun fast hinbekommen. Es wird zwar ausgedruckt, aber ich komm mit den Positionen nicht klar. Es erscheint immer wieder in der linken Ecke oben. Auch wenn ich den wert von InflateRect ändere. Wenn ich den auf -400 einstelle, kommt nichts auf Papier
  procedure TForm1.BtnPrintClick(Sender: TObject);
  var rec : TRect;
  begin
  if PrintDialog1.Execute then
  begin
  rec.Left := 400;
  ...
• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  So, ich hab nun mit dem obrigen Code einen Versuch gestartet. Ich sehe jetzt den Text in meiner From ganz oben. Wie bekomme ich diesen aber nun auf Papier?
• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Das ist es ja, was ich nicht verstehe. Ich versteh nicht, wie ich es wo in mein kleines Projekt einbauen kann.
• Forum: Sonstige Fragen zu Delphi

  AW: Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Das mit DrawText hab ich mir schon angesehen, aber leider komm ich hier nicht weiter wie ich es einbauen kann.
  Reports wollte ich vermeiden.
  
  Wie stelle ich es denn mit DrawText an? Ich hab mich schon die Finger wund gesucht aber noch nichts gefunden, wie ich mit DrawText arbeiten kann!
• Forum: Sonstige Fragen zu Delphi

  Im druck Zeilenumbruch erzwingen

   
    by m-werk, 11. Apr 2012
  Hallo,
  
  ich bin gerade dabei, einen Druck-Button zu realisieren. Soweit funktioniert schon mal alles bis auf eine Sache.
  
  In meiner DB habe ich ein Memo-Feld, wo einiges eingetragen werden kann. Das Problem ist der Druck. Wie kann ich einen Zeilenumbruch hier (Im Code unten unter Anmerkung) erzwingen?
  procedure TForm1.BtnPrintClick(Sender: TObject);
  var rec : TRect;
  begin
  if...