منزل
Top.Mail.Ru Yandeks.Metrika
المنتدى: "Main";
الأرشيف الحالي: 2002.01.08;
تنزيل: [xml.tar.bz2];

إلى

مرة أخرى ، مشكلة النص: أقوم بعرض Image1.Canvas.TextOut ، ولكن أسفل النص نفسه عداء أبيض. هل من الممكن إذا لم تقم بإزالة (ضع الحروف فقط) ، ثم اجعل العداء أسود على الأقل. البحث عن فروع مماثلة


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

هذا هو بيت القصيد ...



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

جعل
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 хелп стоит.

جرب هذا.

الإجراء TForm1.Button1Click (المرسل: TObject) ؛
var b: tbitmap؛
r:trect;
بدأ
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");
الغاية؛
image1.picture.LoadFromFile("e:\camera1.bmp");
image1.canvas.copymode:=cmSrcInvert;
image1.canvas.copyrect(r,b.canvas,r);
b.free.
الغاية؛



صفحات: 1 فرع كامل

المنتدى: "Main";
الأرشيف الحالي: 2002.01.08;
تنزيل: [xml.tar.bz2];

الطابق العلوي









الذاكرة: 0.58 ميغابايت
الوقت: 0.025 ج
1-22253
Yakudza
2001-12-17 14:34
2002.01.08
كيفية حساب مضروب في باسكال؟


1-22228
نازغول
2001-12-15 14:28
2002.01.08
كيف نفعل؟


1-22009
oomneeq
2001-12-14 21:26
2002.01.08
مرجع فئة دائرية


3-21966
ZG
2001-12-03 12:42
2002.01.08
لماذا فعلت كل ما عندي من الأسئلة. سيتعين علينا تكرار كيفية البحث عن النوع في الحقل: الأسقف مكتوبة وأحتاج إلى العثور عليها


4-22480
amamed_3071
2001-11-03 10:09
2002.01.08
الطباعة إلى طابعة إبسون





الأفريكانية الألبانية عربي الأرميني أذربيجان الباسكي البيلاروسية Bulgarian التشيكية الصينية المبسطة) تقاليد صينية) الكرواتية التشيكية دانماركي Dutch أنجليزي الإستونية الفلبينية Finnish جيب
الجاليكية الجورجية الألمانيّة اليونانيّة الكريولية الهايتية اللغة العبرية الهندية الهنغارية أيسلندي Indonesian الأيرلندية Italian اليابانيّة الكوريّة اللاتفية اللتوانية المقدونية الملايو المالطية Norwegian
اللغة الفارسية بولنديّة البرتغاليّة رومانية Russian صربي السلوفاكيّة سلوفيني إسباني السواحيلي Swedish Thai التركية الأوكراني الأردية الفيتنامية ويلزي اليديشية البنغالي البوسنية
السيبيونو الاسبرانتو الغوجاراتية الهوسا همونغ الإيبو جاوي الكانادا الخمير لاو لاتينية الماوري المهاراتية المنغولية النيبالية البنجابية الصومالية التاميل التيلجو اليوروبا
زولو
Английский Французский ألماني Итальянский البرتغالية Русский Испанский