Текущий архив: 2007.03.11;
Скачать: CL | DM;
Вниз
TextOut Найти похожие ветки
← →
sat © (2007-02-18 11:29) [0]у меня такой вопрос можно ли вывести TextOut по фону Bitmap?
brush.Bitmap := pict;
FloodFill(0,0,clBlack,fsBorder);
if (i mod 5 )=0 then
begin
pen.Color := clBlack;
pen.Width := 3;
Font.Size := 6;
Font.Color := clRed;
if i = 0 then TextOut(cordx,cordy,"12")
else TextOut(cordx,cordy,floattostr(i/5));
если отключить brush.Bitmap := pict; FloodFill(0,0,clBlack,fsBorder);
то рисуются цифры, иначе нет. как сделть прорисувку и фона и цифр??
← →
sat © (2007-02-18 11:33) [1]извиняюсь за пост уже обнаружил как исправить...
Страницы: 1 вся ветка
Текущий архив: 2007.03.11;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.044 c
