Ergebnis der Suchanfrage

• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Texte ändern in Tprintdialog

    Delphi
    by R2009, 19. Nov 2010
  Hi,
  
  das funktioniert solange ich das in der Hauptform implementiere. Habs jetzt in meine eigene Klasse exportiert. Funktioniert nicht.
  Hab den Code angehängt. Vielleicht weiss jemand eine Lösung.
  (das ist Quick&dirty Code zum ausprobieren)
  Aufruf mit button5. Button1 und 2 sind für die anderen Dialoge (open und save)
  button 3 und 4 sind nutzlos.
  
  Grüsse
  Rainer
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Texte ändern in Tprintdialog

    Delphi
    by R2009, 19. Nov 2010
  Hi,
  
  vielen Dank, das funktioniert. Es würde mich trotzdem intessieren wo der Unterschied liegt.
  Im meinem und in deim Fall machen wir nichts anderes als eine message an Tprinterdalog zu senden.
  In deinem Fall erzwingst du das senden durch den postmessage Befehl.
  Eigentlich müsste es doch reichen mit SetDlgItemText den Text zu setzen.
  Diese system kann ich bei mir nicht anwenden. Muss mit...
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Texte ändern in Tprintdialog

    Delphi
    by R2009, 19. Nov 2010
  Hi Luckie,habs mit deinem Vorschlag probiert. Kommt aber letztlich auf dasselbe raus was ich schon probiert hatte. Tprintdialog reagiert auf kein i was immer ich auch versuche.
  pd2 ist der name des Tprinterdialogs (auf die Form gezogen).
  
  
  b:=SetDlgItemText(pd2.Handle,i,pchar(a));
  
  
  
  Grüsse
  Rainer
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Texte ändern in Tprintdialog

    Delphi
    by R2009, 19. Nov 2010
  Hi Luckie,
  handle hat sich geändert, sodass ich annehmen muss, dass es gültig ist.
  CDM_SETCONTROLTEXT stammt aus CommDlg
  
  Wie gesagt, das ganze funktioniert mit den beiden anderen Dialogtypen einwandfrei.
  
  Grüsse
  Rainer
• Forum: Algorithmen, Datenstrukturen und Klassendesign

  Texte ändern in Tprintdialog

    Delphi
    by R2009, 19. Nov 2010
  Hi DP'ler,
  ich möchte die Standardtexte in Tprintdialog ändern.
  Mit Topen bzw Tclosedialog funktioniert das prima mit Tprintdialog nicht.
  
  
  procedure TPrintdlg.printDialogEEShow(Sender: TObject);
  const LB_FILETYPES_ID = 1089;LB_FILENAME_ID = 1090;LB_DRIVES_ID = 1091;LB_Title=1088;
  var eePrintDialog: HWND;a:string;
  begin
  eePrintDialog := GetParent((sender as Tprintdlg).Handle);