کجای این کد ایراد داره؟

[djscsi]

کجای این کد ایراد داره؟
if ComboBox1.Items.Text='tahoma' then
Memo1.Font.Style:=tahoma

من می خام داخل memo1 با font و size دلخاه بنویسم ولی نمیشه ؟ چرا؟

if ComboBox2.Items.Text='16' then
Memo1.Lines.Size:=16
اینم می نویسم ولی اصلا اندازش تغییر نمی کنه نمی دونم چرا

[Masoudxb]

برای تغییر فونت:
Memo1.Font.Name := 'Tahoma';


برای تغییر اندازه:
Memo1.Font.Size := 20

[حمیدرضاصادقیان]

سلام. به این شکل بنویس


Memo1.Font.Name:='TAhoma';
Memo1.Font.Size:=20;

[djscsi]

ممنون دوستان من اونجوری نوشتم ولی اصلا کار نکرد می گم شاید باید قابلیتی رو تو memo مثلا enabed کنم تا درست شه
ممنون بازم منتظر چوابتون می مونم
راستی یه سوال دیگه من چه طوری میتونم یه scrollbar رو با memo هماهنگ کنم
مثلا وقتی خطی به memo اضافه شد scrollbar بره پایین

[Hsimple11]

با سلام.
برای تغییر فونت به راحتی کافیت خاصیت فونت object خود را تغییر دهید. اگر میخواهید با تغییر محتویات یک combobox یا هر چیز دیگر خاصیت فونت کامپوننتی دیگر مثل memo تان تغییر کند تنها کافیست در رویداد ComboBox Onchange خود بنویسید:


Memo1.Font.Name := ComboBox1.Text;
Memo1.Font.Size := Combobox2.Text;

l موفق باشید...

[Hsimple11]

راستی یه سوال دیگه من چه طوری میتونم یه scrollbar رو با memo هماهنگ کنم
مثلا وقتی خطی به memo اضافه شد scrollbar بره پایین

دوست عزیز کافیست خاصیت scrollbars آن memo را به ssboth برای هر دو scrollbar افقی و عمودی یا تنها horizontal یا vertical قرار دهی...

موفق باشی

[djscsi]

با تشکر از همه دوستان
اگه اجازه بدید یه تشکر ویژه از اقای hsimple بکنم
جالب
Memo1.Font.Name := ComboBox1.Text;

Memo1.Font.Size := Combobox2.Text;این جواب داد ولی کدهای بالا که در اصل همین بود تغییری تو memo ایجاد نمی کرد
چرا نمیدونم

[djscsi]

دوستان در مورد bold یا italic یا underline کسی میتونه کمکی بکنه
memo1.Font.Style:=bold
این مشکلش چیه ؟

[Hsimple11]

دوست عزیز خاصیت style فونت، شامل مجموعه ای از style ها بنام TFontstyles میشود. بنابراین بایستی کد خود را در [] قرار دهید.


Memo1.Font.Style := [fsbold]

موفق باشید...

[اصغر (پآچ)]

با تشکر از همه دوستان
اگه اجازه بدید یه تشکر ویژه از اقای hsimple بکنم
جالب
Memo1.Font.Name := ComboBox1.Text;

Memo1.Font.Size := Combobox2.Text;این جواب داد ولی کدهای بالا که در اصل همین بود تغییری تو memo ایجاد نمی کرد
چرا نمیدونم

سلام دوست من
این فقط به این دلیل است که شما زمان تغییر این خاصیت ها رو در جای مناسب خودش تعیین نکرده بودی!

برای اینکه بخوای با تغییر یک کامپوننت خصوصیت یک کامپوننت دیگه تغییر کنه بهترین رویداد ها OnChange و OnExit و ...Onkey ها هستند.

موفق و موید باشی

[djscsi]

ممنون دوستان
ولی من می خام بعدش مثلا به صورت معمولی در بیاد اینو می نویسم ارور می ده
Memo1.Font.Style := [fsregular]

[vcldeveloper]

ولی من می خام بعدش مثلا به صورت معمولی در بیاد اینو می نویسم ارور می ده
قبل از اینکه از خودتون کد اختراع کنید، راهنمای دلفی را نگاه کنید، ببینید اصلا fsRegular داره؟!
برای حذف یک خصوصیت از لیست Style آن را از لیست تفریق کنید:

Font.Style := Font.Style -[fsBold];

برای خالی کردن Style هم:

Font.Style := [];

درباره مجموعه ها در دلفی تحقیق کنید تا مشکلاتی که از این نوع دارید براتون برطرف بشه