delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيف أستخدم Bevel في برنامجي؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

أنا لا أعرف كيفية استخدام هذه الأداة...و قد بحثت لكن لم أجد موضوعا يتناولها.
لذا أتمنى من الإخوة الكرام... مشكورين... تقديم شرح لكيفية استخدامها
وعليكم السلام

هذه الاداة هي شكلية اي انها تساعد على تصميم خلفيات ذات بعد ثلاثي للعناصر الاخرى
لمعرفتها اذهب الى
properties ثم shape و style فتظهر عدة
قيم جربها لتغيير الشكل


وهذا مثال عن كيفية اضافة 'canvas'
كود :
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type ( tbevel=class(extctrls.TBevel type (TForm1 = class(TForm Bevel1: TBevel; Button1: TButton; //.................... //................. procedure TForm1.Button1Click(Sender: TObject); var pic:tpicture; begin pic:=tpicture.Create; pic.LoadFromFile('c:\untitled.bmp'); bevel1.canvas.Draw(0,0,pic.Graphic);; end; end.
بارك الله فيك أخي العزيز على المعلومات القيمة