فالح المطيري

السلام عليكم يا اخوان : في الفيجوال بيسك SendKey "+%" لتحويل الكيبورد من انجليزي الى عربي ما الذي يقابله في دلفي ؟ وجزاكم الله خير.

الاخوه الكرام: وجدت كود بسيط بخصوص DONulls: procedure DoNulls; var i : word; begin for i := 0 to ComponentCount - 1 do begin if Components is TEdit then TEdit(Components.Text := ''; end; end دعواتكم الصالحة

الله يجزيك الخير على الموضوع اللي الكل يتمنى معرفته

السلام عليكم ايها الاخوة الكرام من لديه نسخة او وصلة لWise Installation الرجاء ابلاغنا مشكورا. وجزاكم الله كل خير

1: Query1.SQL.Add(' where FirstName like "'+ edit1.text+'%"'); 2: Query1.SQL.Add(' Where LastName like "'+ edit1.text+'%"'); 3:

procedure TSearchForm.Button1Click(Sender: TObject); begin Query1.SQL.Clear; Query1.SQL.Add(' select * from table1'); case RadioGroup1.ItemIndex of 0: Query1.SQL.Add(' where MembershipNo = ' + QuotedStr(edit1.Text)); 1: Query1.SQL.Add(' where FirstName like "'…