Форум: "Базы";
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];
ВнизНикто не встречал компонент TDBGrid у которог можно былобы вставить фоновую картинку ? Найти похожие ветки
← →
dmitriyk (2002-02-18 02:49) [0]Здрасте все.
Господа ! Никто не подскажет, может быть кто нибудь знает где можно взять компонент для БД. типа TDBGird - у которого бы можно былобы вставить фоновую картинку.
А еще лучше, что бы он мог бы быть transparent := True. Т.е прозрачный.
И попутно, мне нужен компонент TMemo - с аналогичными возможностями.
Пожалуйста.
← →
Севостьянов Игорь (2002-02-20 21:59) [1]По-моему легче самому задать стиль окна ( TDBGrid дальний наследник от TWinControl) c помощью SetWindowLong
Где-то так
procedure SetWindowTransparent;
var
Style: Longint;
hWnd: THandle;
begin
hWnd := Handle; //Handle нужного окна
Style := GetWindowLong(hWnd, GWL_EXSTYLE);
Style := Style or WS_EX_TRANSPARENT;
SetWindowLong(hWnd, GWL_EXSTYLE, Style);
end;
Сам не пробовал, пишу от руки без делфей, код верный а поможет ли не знаю...
Картинку вставить ? Ну так поискал бы хоть - примеров полно
Попробую навскидку написать сейчас
Ну например так:
procedure TMemo1.OnChange;
begin
Image1.Refresh; // картинка все время поверх букв
end;
procedure TMemo1.OnChange;
begin
Image1.Parent := Memo1; // картинка в Memo1
Image1.Align := alClient;
end;
Это грубо, но ты посмотри лучшей TBitmap.Draw в исходниках Делфей
Для TDBGrid конечно все хуже - там каждая ячейка отрисовываеться постоянно ( WM_PAINT) просто глазу незаметно
А вообще ищи, дерзай. Инет - большая свалка - чего только нет
Усё - вопросы по мылу
← →
dmitriyk (2002-02-20 22:54) [2]Я так понял, что ПОКА ни у кого не вставал такой вопрос, потому, что ответов практически нет.
>Севостьянов Игорь
Спасибо и на этом !
Удачи.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c