Einzelnen Beitrag anzeigen

Benutzerbild von MessOldie
MessOldie

Registriert seit: 1. Apr 2009
Ort: Reinsdorf OT Friedrichsgrün
12 Beiträge
 
Delphi 6 Personal
 
#6

AW: Richedit kann URL's nicht mehr erkennen - wie doch wieder?

  Alt 7. Mär 2016, 11:15
@Luckie:
Ich bin nicht drauf gekommen; ich war faul und habe nur kopiert...

Ich habe diese drei Zeilen an mindestens 2 Stellen hier im Forum genauso gefunden, u. a. da:
www.delphipraxis.net/186798-richedit-mit-eigenen-urls
Vermutlich stammen alle von den Schweizern:
http://www.swissdelphicenter.ch/de/showcode.php?id=1505
http://www.swissdelphicenter.ch/de/showcode.php?id=1652
Der Gedankengang des Urschreibers war meiner Ansicht nach so:
1. Mit #define AURL_ENABLEURL 1 bedeutet
  • AURL_ENABLEURL = "Einschalten" und
  • 0 = "Auschalten".
2. Dann ist das eine Ja-Nein-Entscheidung und True-False verdeutlicht das Pascal-mäßig recht gut.
3. Also schreibe ich "Integer(True)", wenn ich einschalten will.

Weil ich wirklich gerne noch was hinzulerne (s. u., nur mit dem Hängebleiben hapert's oft), habe ich die Zeile umgeschrieben:
SendMessage(Handle, EM_AUTOURLDETECT, AURL_ENABLEURL, 0); ,
und weiter oben eingefügt
const AURL_ENABLEURL = 1; Wie zu erwarten war, hat sich am Verhalten nichts geändert.

@himitsu:
Bei sowas am Besten die Komponente ableiten und CreateWnd oder CreateWindowHandle überschreiben und dort die Einstellungen wieder herstellen einstellen, wenn das interne Windows-Control (neu) erstellt wird.
Natürlich hast Du auch hier wieder recht, aber wenn ich (fast) das gleiche Ergebnis mit weniger Aufwand erreiche, dann kommt meine Faulheit wieder durch...

Ich bleibe dabei: Der Nutzer darf einfach WordWrap nicht mehr toggeln und ich habe meine Ruhe...

Aber danke an Euch alle, dass ihr mir einen Teil Eurer Zeit gewidmet habt (und das ist nicht ironisch gemeint)!
Gottfried Pilz
Man kann immer noch dazulernen
  Mit Zitat antworten Zitat