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

Вниз

ListBox и DrawText   Найти похожие ветки 

 
Sonic90   (2008-01-12 22:47) [0]

Здраствуйте!Проблема вот в чём,я отрисовываю текст в ЛистБоксе используя функцию DrawText,а как получить текст всех отрисованых строк и записать их к примеру в TStrings?


 
KilkennyCat ©   (2008-01-13 01:17) [1]

Встречный вопрос со встроенным ответом: а где текст хранится в листобксе где?


 
Leonid Troyanovsky ©   (2008-01-13 01:21) [2]


> Sonic90   (12.01.08 22:47)  

> используя функцию DrawText,а как получить текст всех отрисованых
> строк и записать их к примеру в TStrings?

К примеру, записать их в TStringList после/перед рисованием.

--
Regards, LVT.


 
Leonid Troyanovsky ©   (2008-01-13 01:31) [3]


> KilkennyCat ©   (13.01.08 01:17) [1]

> где текст хранится в листобксе где?

В Вологде?

--
Regards, LVT.


 
KilkennyCat ©   (2008-01-13 01:31) [4]


> Leonid Troyanovsky ©   (13.01.08 01:21) [2]


Забавно. Ответ мастера.
А ListBox.Items - это просто так сделали?


 
Leonid Troyanovsky ©   (2008-01-13 01:33) [5]


> KilkennyCat ©   (13.01.08 01:31) [4]

> А ListBox.Items - это просто так сделали?

Наивный.

--
Regards, LVT.


 
MsGuns ©   (2008-01-13 01:48) [6]

Включив телепатор, делаю предположение, что автора интересуют только видимые строки листбокса


 
Германн ©   (2008-01-13 01:48) [7]


> KilkennyCat ©   (13.01.08 01:31) [4]
>
>
> > Leonid Troyanovsky ©   (13.01.08 01:21) [2]
>
>
> Забавно. Ответ мастера.
> А ListBox.Items - это просто так сделали?
>

А какое отношение имеет текст выводимый WinAPI функцией в каком-то hDC к ListBox.Items?


 
Германн ©   (2008-01-13 01:51) [8]


> MsGuns ©   (13.01.08 01:48) [6]
>
> Включив телепатор, делаю предположение, что автора интересуют
> только видимые строки листбокса
>

А что? В нём есть и "невидимые"?


 
KilkennyCat ©   (2008-01-13 01:52) [9]

procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
  drawtext(listbox1.Canvas.Handle, pchar(listbox1.Items.Strings[index]), length(listbox1.Items.Strings[index]), rect, 1);
end;

это наивно навскидку.


> Германн ©   (13.01.08 01:48) [7]


а для чего собственно, вообще использовать в таком случае ЛистБокс?


 
Leonid Troyanovsky ©   (2008-01-13 10:30) [10]


> KilkennyCat ©   (13.01.08 01:52) [9]

> а для чего собственно, вообще использовать в таком случае
> ЛистБокс?

Случаи разные бывают.
См. LBS_HASSTRINGS.

--
Regards, LVT.


 
KilkennyCat ©   (2008-01-13 11:20) [11]


> Leonid Troyanovsky ©   (13.01.08 10:30) [10]


Имеется ввиду отсутствие оного?


 
Leonid Troyanovsky ©   (2008-01-13 11:42) [12]


> KilkennyCat ©   (13.01.08 11:20) [11]

> Имеется ввиду отсутствие оного?

Да.

Кроме того, owner-drawn листбоксы могут содержать пустые строки,
что до появления стилей lbVirtual довольно часто использовалось.

--
Regards, LVT.


 
KilkennyCat ©   (2008-01-13 11:48) [13]


> Leonid Troyanovsky ©   (13.01.08 11:42) [12]
>
>


отлично. ну тогда я выкидываю свой телепатор. раз автор выкидывает хэзстринг, который по умолчанию есть, значит он работает ну с очень достаточно большим объемом данных, и где он их перед этим хранит фиг знает... и при этом получаем полный винапи... да еще и вопрос так поставлен, что просто один вариант прочтения, что автору хитрое выравнивание понадобилось...

за "наезд" в [4] приношу извинения.



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

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

Наверх




Память: 0.47 MB
Время: 0.047 c
2-1199779394
Zheksik
2008-01-08 11:03
2008.02.03
Варианты решения задачи сравнения вещественных чисел.


4-1182958417
sergeii
2007-06-27 19:33
2008.02.03
как можно послать локальному активному пользователю сообщение


2-1198145145
vegarulez
2007-12-20 13:05
2008.02.03
Вопрос про перекодировку response (IdHTTP, Indy8->Indy10)


15-1198693128
Terc
2007-12-26 21:18
2008.02.03
Кто шарит в Lazarus


15-1198637568
Slider007
2007-12-26 05:52
2008.02.03
С днем рождения ! 26 декабря 2007 среда





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский