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

Вниз

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

 
Oleg Barsky   (2003-10-13 14:50) [0]

Какой в сабже там синтаксис?
Пробую:
DrawText(Handle, PChar(s),-1,R,DT_Right or DT_SINGLELINE);
Тоесть хочу вставить s:string.
Ничего не получается. Строка нагло украдена из другого обработчика.
Помогите излечиться!!!


 
ZrenBy   (2003-10-13 15:01) [1]

Windows.DrawText(Grid.Canvas.Handle,LPSTR(S),-1,Rect,DT_VCENTER or DT_SINGLELINE or dtStyle);


 
Oleg Barsky   (2003-10-13 15:03) [2]

Совсем не завелось.
Распиши, плз, все обозначения.


 
Vlad   (2003-10-13 15:03) [3]

Кнопку F1 трудно нажать ?
Какой хендл ты туда передаешь ? Нужен хендл Canvas"a
Параметр, названный тобой R как описан ? д.б. TRect, желательно взять Rect из параметра процедуры.


 
Oleg Barsky   (2003-10-13 15:09) [4]

2Vlad: А ты случайно не Парфенов?
R:=Rect;


 
Vlad   (2003-10-13 15:13) [5]

>Oleg Barsky (13.10.03 15:09) [4]
Нет, я не Парфенов. И не Шендерович.
Чего не получается-то ? Какая ошибка ?


 
Oleg Barsky   (2003-10-13 15:18) [6]

В том то и дело, что ошибки нету. Просто ничего не происходит.
Объясню чего хочу добиться.

Рисуестя табличка с ИНН"ами. Мне нужно вместо них подставить имена из другой таблички. Имя отловил в s:string. Теперь его нужно просто подставить.
КАК? =(


 
Vlad   (2003-10-13 15:23) [7]

Самый тупой способ - TField.OnGetText
Самый нормальный способ - сделать в выборке Join с другой табличкой и выводить вместо инн поле из другой таблички


 
Oleg Barsky   (2003-10-13 15:28) [8]

Ты пальцем покажи.
Что написать что бы заработало?


 
Vlad   (2003-10-13 15:33) [9]

Извини, с телепатией сегодня у меня туговато... Выпил вчера лишнего :(


 
Oleg Barsky   (2003-10-13 15:39) [10]

Понимаю, вчера выходной.
Спасибо.


 
Oleg Barsky   (2003-10-13 15:43) [11]

Весь гемор был из за того, что забыл строку
with DbGrid1.Canvas do
Ну учусь я еще...


 
MsGuns   (2003-10-13 15:47) [12]

1.Допустим, вместо содержимого поля MyFld НД, отображаемого в гриде, надо показывать поле AnotherFld из другой таблицы.
В SQL отображаемого НД добавляешь вывод AnotherFld и условие Where <Условие>
2.В событии OnGetText поля MyFld шлепаешь что-то вроде этого:

Text := FieldByName("AnotherFld").AsString;

и в гриде отображается вместо "родного" поля то, что надо

Если не устраивает по простецки, то в событии грида рисуй TextOut, предварительно создав пустой обработчик OnGetText для того, чтобы не допустить прорисовку родного поля. Но там трабла: как обратиться к соотв.записи другого НД, которая, ИМХО, решается куда хитрее и требует значительно бОльших ресурсов проц.времени.



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

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

Наверх




Память: 0.46 MB
Время: 0.009 c
4-8742
arous
2003-08-30 23:55
2003.11.03
Меню


4-8733
Чапаев
2003-08-28 14:23
2003.11.03
Переменный окружения в Delphi


4-8706
SkyN
2003-09-01 13:01
2003.11.03
hook на нажатие клавишь, ошибка


1-8447
SoftFM
2003-10-21 20:23
2003.11.03
Поиск файлов


7-8690
dim-
2003-08-21 15:22
2003.11.03
Сканирование изображения





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский