كيف يمكن تزيين Button في دلفي7

[Delphi_2007]

السلام عليكم

اتمناكم بخير ان شاء الله

سؤال: هل يمكنني تثبيت نسختين من دلفي؟

سؤالك كيف يمكنني تزيين أزرار بدلفي7، لقد تابعت أحد الدروس واردت تطبيق

ولكن في مرحلة الضغط على الزر والاتصال بمكون Imagelist، عند الذهاب لخصائص الزر

والبحث عن خاصية Image لا اجدها؟

[PLANSHARP]

و عليكم السلام, كيف الحال!

نعم يمكن تثبيت أكثر من نسخة.

بالنسبة لتزيين الزر فهمت أنك تريد وضع صورة عليه, فيمكنك استعمال Speedbutton, يحتوي على الخاصية Glyph وهي التي تريد.

[Delphi_2007]

بالف خير الحمد الله،

شكرا للاجابة

فيما يخص المكون المرشح للاسف لم اجده، نسخة دلفي التي استعملها هي دلفي 7

---

النسخة التي اعمل بها


  123.jpg (الحجم : 115.83 ك ب / التحميلات : 3)

[PLANSHARP]

موجود ضمن تبويبة ال Additional ضمن مستودع المكونات..

[Agmcz]

يمكنك استعمال Speedbutton الموجود في التبويب Additional كما اخبرك الأخ PLANSHARP.
أو إستعمال نسخ دلفي الحديثة.
كما يمكنك البحث عن مكونات تدعم هذه الخاصية.
أيضا

PHP كود :

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, XPMan;

type
  TButton = class(StdCtrls.TButton)
  protected
    procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
  end;

type
  TForm1 = class(TForm)
    Button1: TButton;
    XPManifest1: TXPManifest;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TButton.WMPaint(var Message: TWMPaint);
begin
  inherited;
  DrawIconEx(GetDC(Handle), 5, (Height div 2) - 8, Application.Icon.Handle, 16, 16, 0, 0, DI_NORMAL);
end;

end. 


[Delphi_2007]

صباحكم خير وبركة

شكرا على الردود، الله يحفظكم

ممكن نصيحة، أي نسخة أثبت؟

[bouh25]

انصحك بالنسخ الاخيرة من الديلفي نسخ xe7 وما فوق الى delphi tokyo xe10.2

[Delphi_2007]

شكرا اخي على النصيحة

[samir28]

لم لا تستعمل Alpha controls / Alpha skin ؟
فهو يضفي على برنامجك الكثير من الرسوميات .

[Delphi_2007]

شكرا لرد اخي، لم اكن اعرف بهذا المكون سابقا،