Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];
ВнизScreenToClient Найти похожие ветки
← →
Юрий Зотов (2002-01-14 21:57) [4]Попробуйте проще:
var
R: TRect;
begin
R := Label1.BoundsRect;
OffsetRecT(R, -Image1.Left, -Image1.Top);
Image1.Canvas.FillRect(R);
...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.005 c