Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi fremdes RichEdit auslesen? (https://www.delphipraxis.net/44419-fremdes-richedit-auslesen.html)

Flocke 9. Sep 2006 19:29

Re: fremdes RichEdit auslesen?
 
Du könntest dir die Länge vom letzten Abruf merken (WM_GETTEXTLENGTH) und nur dann den Text erneut abfragen, wenn sich die Länge geändert hat. Bringt vielleicht nicht viel, aber immerhin etwas.

Außerdem könntest du dir so jeweils nur die Änderungen geben lassen. Die folgende Funktion aktualisiert den Parameter oldlen jeweils so, dass beim nächsten Aufruf (mit derselben Variablen) nur der neu hinzugekommene Text zurückgegeben wird:
Delphi-Quellcode:
function GetNewForeignWindowText(wnd: HWND; var oldlen: Integer): string;
var
  len: Integer;
  buf: string;
begin
  len := SendMessage(wnd, WM_GETTEXTLENGTH, 0, 0);
  if len > oldlen then
  begin
    SetLength(buf, len);
    SendMessage(wnd, WM_GETTEXT, len + 1, Integer(@buf[1]));
    SetString(Result, @buf[oldlen + 1], len - oldlen);
    oldlen := len;
  end
  else
    Result := '';
end;

API 10. Sep 2006 02:46

Re: fremdes RichEdit auslesen?
 
Zitat:

Zitat von API
moin,

Möchte eine fremdes RichEdit auslesen mit allen Formatierungen.
Bitte keine WM_GETTEXT Antworten.

Es war eigentlich ursprünglich meine Frage und ich wollte keine WM_GETTEXT Antworten, da es nicht den kompletten Text des Richedits holt, sowie unformatiert.

robert23 10. Sep 2006 08:39

Re: fremdes RichEdit auslesen?
 
sry das ich 16 Monate später deinen Thread wiederbelebt habe und nun nicht ganz dein gewünschtes Ergebnis rauskommt. Oder hast du viell. in dieser langen Zeit eine Lösung entwickelt?

API 12. Sep 2006 08:13

Re: fremdes RichEdit auslesen?
 
Zitat:

Zitat von robert23
Oder hast du viell. in dieser langen Zeit eine Lösung entwickelt?

leider nicht...Gibt's hier keine API GURURS?


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:34 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz