ظاهر برنامه

[شفیعی]

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

[JavanSoft]

از کامپوننتهای این کار مثل ThemeEngin&Media Pack استفاده کنید

[شفیعی]

سلام
کامپوننت را از کجا می توان تهیه نمود

[omidsm]

در این مورد من از خیلی کامپوننت ها استفاده کردم و همه شان به نوعی ایراد دارند و یا کار زیاد میبرند :roll:
به نظر من بهترین آنها VCLSKIN است که از http://www.Link-rank.com می تونی دانلود کنی :mrgreen:
فقط دو ایراد دارند که به تهیه کننده ارجاع دادم تا اصلاح کند : :arrow:
1- در مورد BiDiMode وقتی از راست به چپ استفاده می کنی مشکل دارند
2- وقتی فرم را داخل DLL قرار می دهی مشکل دارند :skull:
بقیه که می تونی استفاده کنی:
BusinessSkinForm
DynamicSkinForm
SkinEngine
ThemeEngine
به نظر من همه این موارد بجز VclSkin یک ایراد دارند که برای برنامه های کوچک که 2یا 3 فرم دارند مناسبند ولی برای
برنامه های بزرگ مفید نیستند چون باید از ابتدا از کامپو ننت های آونها استفاده کنی که این زمانبر است
اگر هر کدوم رو خواستی می تونی از این سایت تهیه کنی 8)
دنبالشون بگردی پیدا می کنی 8)

[SReza1]

میتونی یک image در bachground فرمت قرار بدی !میتونی از دکمه‌های چند حالته استفاده کنی
میتونی یک انیمشن در برنامه داشته باشی!! و کارهای متفاوت دیگه

[شفیعی]

سلام
چگونه می توان ظاهر برنامه را شبیه XP نمود

[مهدی کرامتی]

چگونه می توان ظاهر برنامه را شبیه XP نمود
یک عدد کامپوننت XPManifest بر روی فرم تان قرار دهید و پروژه تان را Save کنید.
پشتیبانی Theme های XP بطور خودکار به برنامه شما اضافه خواهد شد.

[شفیعی]

سلام
کامپوننتی را که گفتید از کجا می توان تهیه نمود

[مهدی کرامتی]

این کامپوننت در صفحه Additional در Componenet Palette‌ دلفی قرار دارد.

البته مشکلش اینه که فقط توی winxp کار میکنه توی 98 جواب نمیده :?
میتونی از suiskin استفاده کنی تم های زیادی داره مثل
winxp
apple mac
linux
...

[said ali]

با سلام
اگه کارت میخای حل شه از Region و دستورات اون برای درست کردن کردن فرم استفاده کن که کار راحتیه و اگر میخای سنگ تموم بذاری از skin Engin که تو همینجا پیدا میشه استفاده کن. یه راه قشنگ هم برای زیبا کردن فرمهات استفاده از انیمیشن و به خصوص فلش که اگه خاستی تو همین جا توضیحاتشو پیدا میکنی.

[majid_n]

سید علی جان بهتر چند تا از اون فلش های قشنگتو اینجا بذاری تا همه بچه ها ازشون استفاده کنند . :mrgreen:

[موسوی]

آقا راست میگه

[شفیعی]

سلام
چگونه می توان رنگ فرم را تغییر داد به شکلی که مثلا از بالا رنگی ابی شروع شود وبه رنگ زرد در پایین صفحه ختم شود

[said ali]

با سلام
با عرض پوزش بخاطر دیر شدن این مورد و از اینکه فایل هم در سطح کمیه ولی در هر صورت یه کار کامله اما نه خوب چون وسط امتحانات درستش کردم بعد هم دیگه نشد ادامه بدم.
در هر صورت این یه فایل فلش همراه یه exe که کدش رو هم میفرستم الان ندارمش باید playerflash هم نصب باشه.

[kimia1]

این کامپوننت در صفحه Additional در Componenet Palette‌ دلفی قرار دارد.
ولی من فکر کنم توی صفحه win32 قرار داره :idea:

سلام


چگونه می توان رنگ فرم را تغییر داد به شکلی که مثلا از بالا رنگی ابی شروع شود وبه رنگ زرد در پایین صفحه
ختم شود
یک کامپوننت Image روی فرم بگذار. بعد :


procedure Gradient(Col1, Col2: TColor; Bmp: TBitmap);
type
PixArray = array [1..3] of Byte;
var
rdiv, gdiv, bdiv, h, w: Integer;
p: ^PixArray;
begin
rdiv := GetRValue(Col1) - GetRValue(Col2);
gdiv := GetgValue(Col1) - GetgValue(Col2);
bdiv := GetbValue(Col1) - GetbValue(Col2);

bmp.PixelFormat := pf24Bit;

for h := 0 to bmp.Height - 1 do
begin
p := bmp.ScanLine[h];
for w := 0 to bmp.Width - 1 do
begin
p^[1] := GetBvalue(Col1) - Round((w / bmp.Width) * bdiv);
p^[2] := GetGvalue(Col1) - Round((w / bmp.Width) * gdiv);
p^[3] := GetRvalue(Col1) - Round((w / bmp.Width) * rdiv);
Inc(p);
end;
end;
end;



procedure TForm1.FormShow(Sender: TObject);
var
BitMap1: TBitMap;
begin
Image1.Align:=alClient;
Image1.Stretch:=true;
BitMap1 := TBitMap.Create;
try
Bitmap1.Width := Image1.Width;
bitmap1.Height := Image1.Height;
Gradient(clred, clBlack, bitmap1);
Image1.Picture.Bitmap.Assign(bitmap1);
finally
Bitmap1.Free;
end;
end;

برای اینکه جهت گرادیانت را تغییر بدی جای متغیرهای زیر را عوض کن(h را با w)


for h := 0 to bmp.Height - 1 do
begin
p := bmp.ScanLine[h];
for w := 0 to bmp.Width - 1 do

[said ali]

با سلام
اقا این همه وقت گذشت و 29 بار دونلود شد حداقل یه نظر بدین که چیزی نمیشه!!!! :evil: :evil: :evil:

[یاسر احسانی]

به نظر من بهترین آنها VCLSKIN است که از http://www.Link-rank.com می تونی دانلود کنی

مرسی از معرفی سایت . خوب بود. :wink:

اشاله مشکل ریجستر و اینا نداشته باشه :|

سلام.
VCLSkin تو نسخه جدید مشکل RightToLeft رو حل کرده.

[moradi_am]

component جالبی است

اشاله مشکل ریجستر و اینا نداشته باشه
متاسفانه دارد. caption فرم را به vclskin demo تغییر میدهد .
آیا دوستان راهی سراغ دارند؟

[nasr]

اقا این همه وقت گذشت و 29 بار دونلود شد حداقل یه نظر بدین که چیزی نمیشه!!!!
جالب بود خوب شد . راضی شدی

[said ali]

با سلام



اقا این همه وقت گذشت و 29 بار دونلود شد حداقل یه نظر بدین که چیزی نمیشه!!!!
جالب بود خوب شد . راضی شدی
قربون ادم با معرفت.یاد بگیرید!!!!