Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.10.20;
Скачать: CL | DM;

Вниз

EditBox, метод Add и св-во Caption   Найти похожие ветки 

 
Ruzzz   (2009-07-25 15:00) [0]

В книге KOL написано «2.23.6. Текст окна и шрифт для окна - Caption ...  Хранится в буфере, по крайней мере, до момента создания окна для объекта (после чего содержимое буфера игнорируется, а чтение и запись свойства происходит путем чтения или установки текста окна, через функции API)»

1) Но вот если создаю NewEditBox(Form, [eoMultiline]) и добавляю текст «вручную», а затем использую где-нибудь MemoLog.Add(Str), то текст добавленный «вручную пропадает».

Получается что при Add я попадаю в KOL_ASM.inc - function TControl.Add, где выполняется код:
@@add_text_simple:
       LEA      EAX, [EBX].fCaption
       CALL     System.@LStrCat
       MOV      EDX, [EBX].fCaption
       MOV      EAX, EBX
       CALL     SetCaption
Здесь в EBX ранее переданный из EAX указатель на self, а в EDX добавляемая строка. То есть получается мы используем буфер FCaption, но никак не API, и это проблема :(

В KOL.pas нашел TControl.Add и вроде бы он должен работать с API, но это pascal версия и  не совсем тогда понимаю, почему такая разная реализация? И как подключить ее?

2) Проблема также в том что многие функции для изменения текста, используют API для получения этого текста, но не буфер, например в KOL.pas - TControl.DeleteLines, в ней используется TControl.ReplaceSelection, которая использует API.

Помогите разобраться, возможно эти моменты уже где-то описаны? Спасибо!


 
Ruzzz   (2009-07-25 15:08) [1]

Получается что вместо метода Add(Str) лучше использовать Memo.Caption := Memo.Caption + Str.
Еще бы разобраться как полностью отключить буфер fCaption?


 
Ruzzz   (2009-07-25 16:09) [2]

Запутался я, DeleteLines работает, вроде бы не работал :(



Страницы: 1 вся ветка

Текущий архив: 2013.10.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.009 c
2-1359528835
aka
2013-01-30 10:53
2013.10.20
Ширина букв шрифта


1-1316694379
samalex2504
2011-09-22 16:26
2013.10.20
В TDateTimePicker автоматический переход от дней к месяцу и году


2-1359545925
aka
2013-01-30 15:38
2013.10.20
Asm <--> машинный код


2-1359138247
вова
2013-01-25 22:24
2013.10.20
Как проверить существование объекта типа TBitmap


6-1269857940
ZeTToG350
2010-03-29 14:19
2013.10.20
Переадресация на сокетах