Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
Delphi 12 Athens
|
AW: Eurekalog-Fehlermeldung > Strg+C > Meldung als Text im Speicher
19. Dez 2014, 10:12
Jupp.
Windows-Dialoge machen das von selbst (DefaultHandler vom Windows)
> z.B. MessageBox und TaskDialogIndirect
und ansonsten muß man das selber implementieren. (oder erbt von Dialogen, welche das bereits können)
> z.B. ShowMessage, CreateMessageDialog, TMessageForm, TTaskDialog
Die alte Implementation von ShowMessage und CreateMessageDialog ging auf TMessageForm, wo Borland es selber machte und seit Vista geht das auf TaskDialogIndirect.
> siehe TMessageForm.CustomKeyDown > TMessageForm.GetFormText > TMessageForm.WriteToClipBoard
Also einfach von TMessageForm erben und GetFormText überschreiben.
$2B or not $2B
Geändert von himitsu (19. Dez 2014 um 10:14 Uhr)
|