Получить большой по размеру текс из чужого приложения..

[Neoteric]

Приветствую всех.
Проблема в следующем: В чужом приложении имеется компонент RichEdit, с очень большим текстом, что не поместится в обычный тип стринг, есть вариант сохранить этот текст, скажем, в файловую переменную, а потом работать уже с файлом, так вот как это сделать? Ну, или может быть есть другие варианты?

[Selestis]

Есть тип AnsiString размером до 2 Гб

[Neoteric]

Хм в AnsiString он вообще ничего не заносит..
Мб в коде ошибка..

var s : AnsiString;
Begin
...
      SetLength(s, 100 );//для примера 100
      //находим в чужом приложении компонет RichEdit и присваеваем его h
      //получаем текс
      SendMessage( h, WM_GETTEXT, 100, lparam(@s[1]));
End.

В результате в переменную s ничего не попадает, с типом просто String работает..

[Stilet]

А РичЭдит обрабатывает это сообщение вообще?
Кста в данном случае я бы String на Pchar заменил...

[Ntlegend]

В чужом приложении имеется компонент RichEdit, с очень большим текстом, что не поместится в обычный тип стринг

в стринг можна знать больше 255 символов..

var s:string;
**
SetLength(s, 10000);

или как вариант используй WideString.. ему то и длинну устанавливать не нада..

тоесть сразу

var s : WideString;
Begin
...
      //находим в чужом приложении компонет RichEdit и присваеваем его h
      //получаем текс
      SendMessage( h, WM_GETTEXT, 100, lparam(@s[1]));
End.

[Neoteric]

Не после небольших махинаций с кодом заработало
Указал в самом начале слишком большую длину строки, около миллиона символов, он и неработал
Selestis, Благодорю за помощь
Stilet, C PHcar'ом пробовал, он тоже не всю строку получал..

Думаю можно клоз