Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Novamente, o problema com o texto: eu exibo Image1.Canvas.TextOut, mas sob o texto em si é um quadro branco. É possível, se não removido (apenas para impor letras), então, pelo menos, tornar o preto redondo preto. Encontre agências semelhantes


Serg5   (2001-12-20 14:57) [0]

Esse é o ponto todo ...



MBo   (2001-12-20 15:18) [1]

faça isso
Canvas.Brush.Style:=bsClear;



Serg5   (2001-12-20 17:40) [2]

MBo, помогло, гениально!



MBo   (2001-12-20 17:48) [3]

не надо эмоций, F1 жми ;)



Serg5   (2001-12-20 18:16) [4]

Ещё бы энглишь знать как русиан :) ,
возникла проблема(если ещё не задолбал своими вопросами :( )... не знаю как поступить, задача напечатать черными буквами, если подложка белая, и наоборот белыми буквами на чёрный фон. Но фон как на фотографии, т.е. не однородный. Могу сравнить пиксел из того района, если он чёрный, то приблизительно картина ясна. Но можно и по ошибке нарваться на один светлый пиксель. Или брать всю область(20*100px, пеермножать, делить, определять средний цвет)...
Можно ли как нибудь сравнить код цвета, ярче он или темнее среднего значения серого?



Юрий Федоров   (2001-12-20 21:21) [5]

Вообще, для этого обычно используют SetRop2



Serg5   (2001-12-21 08:57) [6]

Юрий Федоров, а что это за такое? На торри поиск результатов не дал. По яндексу на QT ссылается.. это пакет?



MBo   (2001-12-21 09:54) [7]

SetRop2 - функция API, устанавливает способ смешивания цветов при наложении графики. Опять же F1, если SDK хелп стоит.

Попробуй так.

procedimento TForm1.Button1Click (Sender: TObject);
var b: tbitmap;
r: trect;
começar
r: = image1.clientrect;
b:=tbitmap.create;
b.width:=image1.Width;
b.height:=image1.height;
with b.canvas do begin
font:=image1.Canvas.font;
Brush.Color:=clBlack;
fillrect(r);
Brush.Style:=bsClear;
font.color:=clWhite;
TextOut(5,5,"XorPut");
end;
image1.picture.LoadFromFile("e:\camera1.bmp");
image1.canvas.copymode:=cmSrcInvert;
image1.canvas.copyrect(r,b.canvas,r);
b.free;
end;



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima









Memória: 0.83 MB
Hora: 0.055 c
7-22421
Shen
2001-08-28 15:05
2002.01.08
Upload de dados via com porta


3-21909
DeadMoroz
2001-12-03 15:21
2002.01.08
Bom dia, preciso de conselhos, plz


14-22342
Denso
2001-11-05 18:52
2002.01.08
Competição! Papel de parede para o jogo (local) Sea Fight!


14-22324
Yuraz
2001-11-04 11:37
2002.01.08
Geografia por IP


3-21972
Nariz molhado
2001-12-06 08:30
2002.01.08
FIBs + e geradores





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russa sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol