Скачать: CL | DM;

Никто не встречал компонент 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c