+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ (/showthread.php?tid=6552)
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - أحمد 13 - 10-11-2014
السلام عليكم
لدي سرفر محلي xamp و قواعد عديدة . جربت الاتصال بمكون MyDac و الحمد لله نجح الاتصال
بقي لي مشكل كيف اظهر بيانتي على DBGrid1 . فما هل فيه اضافة امر في اسفل
كود :
implementation
{$R *.dfm}او ماذا و جزاكم الله خيرا و شكرا جزيلا على خيركم للعبد الفقير لربه
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - h-farid - 11-11-2014
و عليكم السلام و رحمة الله
لقد قمت بالجزأ الأصعب من العمل و تستأل عن الأسهل.
اضف مكوني datasource, Table و صلهما ببعضهما و بالـ DBGrid
نشط ال table من الخاصية active
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - أحمد 13 - 11-11-2014
h-farid كتب :اضف مكوني datasource, Table و صلهما ببعضهما و بالـ DBGridأكيد أخي فقلد اجتهدت و للأسف جربت سالفا و لم يعمل فإستعنت بمكونات الخاص بـ my dac
نشط ال table من الخاصية active
اكيد فوضعت MyTable2 و MyQuery1 + و الداتا سورس
كما شاهدته في شرح لموقع اجنبي . و ليس هناك اتصال .
على فكرة : طريقة لا يمكن التعرف على القاعدة . اما طريقتي ففيه تعرف على القاعدة و لا تظهر البيانات على dbgrid ..
هل من افكار اخرى و شاكر لكم خير و نفع الله بكم ان شاء الله
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - onexite - 12-11-2014
PHP كود :
try
MyConnection1.Pooling := true;
MyConnection1.PoolingOptions.MinPoolSize := 1;
MyConnection1.LoginPrompt := false;
MyConnection1.Options.Charset := 'utf8';
MyConnection1.Options.Direct := true;
MyConnection1.Options.UseUnicode := true;
MyConnection1.Username:='root' ;
MyConnection1.Password:='' ;
MyConnection1.Server:='127.0.0.1' ;
MyConnection1.Port:=3306 ;
MyConnection1.Database:='base_02' ;
MyConnection1.Connect;
MyTable1.Connection:=MyConnection1;
MyTable1.TableName:='base_02';
MyDataSource1.DataSet :=MyTable1;
dbgrd1.DataSource:=MyDataSource1;
MyTable1.Active:=True;
if MyConnection1.Connected then begin
btn1.Enabled:=True ; btn2.Enabled:=True ;btn3.Enabled:=True
end else begin btn3.Enabled:=False ;btn1.Enabled:=False;btn2.Enabled:=False; end;
except
on E: Exception do
ShowMessage(Format('Error Message: %s',[ E.Message]));
end;
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - h-farid - 12-11-2014
ارفق لنا محاولتك لنرى أين الخلل
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - nabilkeb - 13-11-2014
سورس المرفق أو مثال شبيه بالإشكال
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - أحمد 13 - 14-11-2014
بارك الله في الجميع ,, تم حل المشكل بفضل الله .. و لكن بقي لي مشكل
القواعد الخاصة بالموقع مشفرة utf8 . الاحرف بالعربية تظهر رموز اما الاحرف الاجنبية تظهر عادي .
فكيف اجعل برنامجي يتصل مع الموقع و يظهر لي العربية ؟
و جزاكم الله خيرا و اسأل الله ان ينفع بكم
و شكرا لكم جميعا على تدخلاتكم مرة ثانية
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - أحمد 13 - 18-11-2014
هل من أفكار يا اخوة الله و الله بحثث و لم اعرف كيف : اجعل برنامجي يدعم الترميز uft8 بحيث القراءة و الكتابة على database و جزاكم الله خيرا
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - onexite - 19-11-2014
أحمد 13 كتب :هل من أفكار يا اخوة الله و الله بحثث و لم اعرف كيف : اجعل برنامجي يدعم الترميز uft8 بحيث القراءة و الكتابة على database و جزاكم الله خيراهل تقوم بقراءة الحلول المقترحة ؟
PHP كود :
MyConnection1.Options.UseUnicode := false;
MyConnection1.Options.Charset := 'utf8';
كيف أتمم اتصالي بنجاح مع قاعدة mysql ؟ - أحمد 13 - 20-11-2014
الحمد لله على فضل الله ثم فكرة الاخ onexite . بعد عدة تجارب نجح الاتصال في مكون Mycnnection و في قائمة الحدث . Onlogin . وضعت التالي
كود :
procedure TForm1.MyConnection1Login(Connection: TCustomDAConnection;
LoginParams: TStrings);
begin
MyConnection1.Options.Charset := 'utf8';
MyConnection1.Options.Direct := true;
MyConnection1.Options.UseUnicode := true;
end;
end.و الان الى حد الساعة لم يبقى معي اي مشكل بخصوص العربية .. و ان شاء الله ما يظهر مشكل ثاني
بارك الله فيكم و جزى الله خيرا اخونا على الفكرة