Delphi Forum

benim kurdugum senorya da ;
müşteri ekle güncelle sil
müşteriye araç ekle güncelle sil
yedek parça / hizmet ekle güncelle sil
servis kayıt aç araç plakasından bul servis kayıt ekle o servisede yedek parça / hizmet ekle
yedek parça / hizmet adında bir tablom var (işcilik yağ değişimi vs.)
boş bir ...

hocam insert edit yaptıgımız yer derken kod olarak anlabılırmısınız
şimdeye kadar yazdıgım kodlar yukardakı gıbı
nerede degısıklık yapacagımı anlıyamadım

Not in edit mode diye bir hata alıyorum hocam
close;
open;
yaptım ama nedendir ?

procedure TForm14.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if (Key=#13) then
begin
//dm.IBQuery2.FieldByName('ADI').AsString:=dm.IBQuery2.FieldByName('ACIKLAMA').AsString;
//DBGrid2.DataSource.DataSet.FieldByName('ACIKLAMA').AsString:=DBGrid3.DataSource.DataSet.FieldByName('ADI ...

tamam hocam cok teşekkür ederim
iyi çalışmalar

Hocam bir code örneği varmıdır bu yapıyla ilgili ben nette bulamadım.
Teşekkürler ilginize.

Selamlar herkese,

bir edit var buraya yazdıgım kelımeyi bir tabloda aratmak istiyorum örneğin işçilik yazdığımda onu acılan bir pencerede yanı yine gridde goster gızle yapmayı düşünüyor aradıgım entere bastıgımda onu bir alttakı hızmet tablosuna atmak.
kod olarak yardım istiyorum
teşekkürler.

Çözüm:

uyari.Close;
uyari.SQL.Clear;
uyari.SQL.Text:='select * from uyarilar, hastalar WHERE current_date -3 <=U_TAR ';//and (OKUMA_DURUMU='+'''OKUNMADI'''+') ';
uyari.Open;
MessageDlg('Hasta Adı :'+uyari.FieldByName('H_AD').AsString +#13+
'Hasta Soyadı :'+uyari.FieldByName('H_SOYAD').AsString +#13 ...

ihalilcoban ve lord_ares hocam öncelikle teşekkür ederim vakit ayırıp ilgilendiğiniz için.

Projeden genel bahsedeyim size daha net olacaktır.

Databasede kullanıcılar , hastalar ve uyarılar tablolarım var

kullanıcı giriş yapıyor,
hasta ekliyor hastayı ekledıkten sonra lısteden arayıp seciyor ...

selamlar herkes,

şimdi delphi ve firebird kullanıyorum

Kullanıcıya istenen tarihten 3 gün öncesinden uyarı verdirmek istiyorum.
hastalara not ekledım kullanıcı sısteme gırdıgınde şu hastanın notu dıye gösterecek

ben kullanıcı girişi butonuna tıkladıgında ;
not tarih - sistem tarihi =3 diye ...

IBquery2.ParamByName('hasta_id').Asİnteger:=listelesq.Fieldbyname('H_id').asinteger;
seklınde çözdüldü problem
saoln

Delphide dbgride üzerindeki satıra tıklayınca o satırın ıd alıp (hastalar tablosu hasta ıd alıcam)
daha sonra o satır secili olan hastaya not eklıycem böylelikle bir hastaya birden cok not eklıyebilmek istiyorum
ıkı tablom var hastalar ve notlar hastalarda hastaid ve notlarda da hastaid var ...