+- Delphi Can (https://www.delphican.com)
+-- Forum: Delphi (https://www.delphican.com/forumdisplay.php?fid=3)
+--- Forum: Genel Programlama (https://www.delphican.com/forumdisplay.php?fid=6)
+--- Konu Başlığı: mysql login ekranı (/showthread.php?tid=5757)
mysql login ekranı - suleymangul0 - 26-02-2021
merhaba arkadaşlar bir rica olacak forumda aradım ama bulamadım rica etsem mysql ile login olma kullanıcı kaydı alma hakkında bilgi verebilecek ya da link paylaşabilecek biri var mı kendim yapıyorum ancak olmuyor aşağıdaki hatayı alıyorum
procedure Tfrm_kyt.btn_kytClick(Sender: TObject);
begin
with kayityeni do
begin
close;
sql.clear;
sql.Text := 'insert into client (id, username, sifre) Values(:id,:username,:sifre)'
ParamByName('id').Value := id.Text;
ParamByName('sifre').Value := pass.Text;
ParamByName('username').Value := users.Text;
end;
end;
end.
bu kayıt ekleme için kullandığım kod
unidac bileşenlerini kullanıyorum bu arada
Cvp: mysql login ekranı - Tuğrul HELVACI - 27-02-2021
(26-02-2021, Saat: 18:19)suleymangul0 Adlı Kullanıcıdan Alıntı: merhaba arkadaşlar bir rica olacak forumda aradım ama bulamadım rica etsem mysql ile login olma kullanıcı kaydı alma hakkında bilgi verebilecek ya da link paylaşabilecek biri var mı kendim yapıyorum ancak olmuyor aşağıdaki hatayı alıyorum
procedure Tfrm_kyt.btn_kytClick(Sender: TObject);
begin
with kayityeni do
begin
close;
sql.clear;
sql.Text := 'insert into client (id, username, sifre) Values(:id,:username,:sifre)'
ParamByName('id').Value := id.Text;
ParamByName('sifre').Value := pass.Text;
ParamByName('username').Value := users.Text;
end;
end;
end.
bu kayıt ekleme için kullandığım kod
unidac bileşenlerini kullanıyorum bu arada
Sorunuz özensiz, örneğiniz de anlamsız. Hata aldığınızı söylemişsiniz ama aldığınız hatanın ne olduğunu söylememişsiniz.
Bu gibi nedenlerle istediğiniz şeyi daha anlamlı şekilde ifade etmelisiniz.
mysql login ekranı - mcuyan - 27-02-2021
@Tuğrul HELVACI beye hak veriyorum. Sorunuzun ne olduğunu anlayamadık daha?
Cvp: mysql login ekranı - suleymangul0 - 01-03-2021
özür dilerim ekran görüntüsü ile daha açıklayıcı olacak sanırım
firedac ile bağlantı kuruyorum sorun yok
kurduğum bağlantı ile db ye sorguları atıp bunları çekebiliyorum
ancak iş kullanıcı adını sql üzerinden kontrol ettirmeye gelince olmuyor ya da ben beceremiyorum demek daha doğru olur
benim yapacağım uygulamada kullanıcı kayıt ve giriş ekranını sql ile bağlamak
kullanıcı bilgilerini sql üzerinden çekmek
aldığım hataya gelince kullanıcı bilgisini sorgulamadan showmessage olayını yapıyor sitem yani kullanıcı adı bilgisini sql den almıyor
kısa bir videoda ekledim yardımcı olması umuduyla
https://drive.google.com/file/d/11-ViTWPj0JggsPiSgEAfA6_bKn31SSlI/view?usp=sharing
mysql login ekranı - 3ddark - 01-03-2021
UniQuery Open veya Execute gibi sorguyu çalıştıran kodlar nerede,
Parametreleriniz var bunlar nereden geliyor,
Ben eksik görmediysem kod yazımında eksiklerin var ve benim önerim,
Query kullanımını araştırın. Bu araştırmayı takiben küçük örnekler ile biraz alıştırma yapın.
mysql login ekranı - suleymangul0 - 01-03-2021
teşekkür ederim yardımınız için
Cvp: mysql login ekranı - suleymangul0 - 18-03-2021
Merhaba,
bu hatayı nasıl çözebilirim amin olamadım her türlü yöntemi denedim ancak sonuç başarısız oldu hatayı nerede yaptığımı bulamadım programı derleyince bu hata mesajı çıkıyor ekte görseli paylaştım
https://drive.google.com/file/d/1wJcrE_clIgn5lwQRtFWJdhw2ITqA3IX8/view?usp=sharing
mysql login ekranı - ercanskose - 18-03-2021
procedure Tfrm_kyt.btn_kytClick(Sender: TObject);
begin
with kayityeni do
begin
close;
sql.clear;
sql.Text := 'insert into client (id, username, sifre) Values(:id,:username,:sifre)'
ParamByName('id').Value := id.Text;
ParamByName('sifre').Value := pass.Text;
ParamByName('username').Value := users.Text;
open;
end;
end;
end.
mysql login ekranı - suleymangul0 - 18-03-2021
cevabın için teşekkür ederim ancak maalsef yine aynı hatayla karşılaştım