Delphi Forum

ertank hocam teşekkür ederim. Gösterdiğiniz yol ile çözüme ulaştım.

ertank hocam aşağıdaki kod yazılı ama illa buna bağlı kalmayabiliriz.
Ve tahmin ettiğiniz gibi text1 ve text 2 Tedittir.
procedure TForm4.araClick(Sender: TObject);
var
ara:variant;
begin
ara:=STOK.Lookup('stokadi',text1.Text,'stokserino');
if VarIsNull(ara) Then
ShowMessage('Kayıt Bulunamadı ...

Database kullanıldığı için ve database tablo alanı içinde arama yaptırıp bilgiyi bulduğunuz için aşağıdaki şekilde verileri okuyabilirsiniz. Hangi Form üzerindeki ADOTable veya ADOQuery bileşenini kullanıyorsanız aşağıdaki ADOTable1 adını siz uygun şekilde değiştirerek kendi uygulamanız içine ...

ertank hocam ilk defa delphi kullanıyorum. Boyumdan büyük bir işe kalkışmışım anladım.
Sizinde dediğiniz gibi access veri tabanı kullanıyorum. bir çok tablom var arama yapmak istediğim tablo adı "STOK" ve stokadi alanında arama yaparak buluyorum, stokserino alanındaki veriyi text2 ye yazdırmaya ...

Arkadaşlar projem neredeyse tamam ama biraz daha yardım lazım. Bir text içerisindeki veriyi tabloda arattırıyorum ve buluyorum, bulunan verinin olduğu kolonun üç yanındaki kolunda aynı satırda bulunan veriyi başka bir text e aldırmam gerek. Örneğin arama yapılacak text1 e 175×15 jant yazıyorum araya ...

Rave Report 5.0 da tarih ve saat atamayı yaptım. Benden başka kullanan varmı bilmem ama belki birilerine faydası olur. Nasıl yaptığımı yazayım. projeye bir datatext ekledim ve datafield özelliğinden data text editör kısmını açtım. report variables kısmından dateshort u seçerek insört report var'a ...

Çok fazla bilgim olmamakla birlikte böyle bir sorunum vardı aşağıdaki kodlar ile çözdüm. Umarım seninde işine yarar. burada tablonun ismi "senintablon" olarak, edit ise "edit1" olarak alınmıştır.

type
yenigrid=class(TDBGrid);//Yeni class tanımlandı

procedure TForm1.Button1Click(Sender: TObject ...

Sayın Lord_Ares cevabınız için çok teşekkür ederim. Sizin dediğiniz gibi cb1.items.add('gb12.Caption'); yaptığım zaman cb1 in text kısmına gb12.caption yazısını her butona basmamda tekrar tekrar aktardı. Bende tırnağı kaldırarak cb1.items.add(gb12.Caption); denedim bu seferde butona verdiğim değeri ...

Merhaba arkadaşlar. Bir çalışmada tıkandım ve bir kaç konuda yardımlarınızı istiyorum.

Çalışmamda bir adet cb1 isminde combobox var ve change bölümünde

procedure TFormSatis.cb1Change(Sender: TObject);
var
urun,aciklama : string;
parantezYeri : integer;
begin
if cb1.Text = '' then exit ...