merhabalar ben delphi de çok yeniyim ve bir evrak takip programı hazırlıyorum veritabanı olarak access, delphi 6 kullanıyorum. bu konuda bilgim olmadığı için sadece formun dizaynını yaptım ama kod olarak neler yazmam gerektiğini bilmiyorum bana yardım ederseniz çok sevinirim şimdiden çok teşekkür ederim herkese...

Arkadasım Delphiye böyle tepeden inme girilmez. Yalnış anlamanı istemem ama formun üzerine bir kaç nesne yerleştirip çalıştırdığında program yaptım denilemez. Senin istediğin şu an için bir projedir.

Geçenlerde bir hata yaptım ve arkadaşımızın teslim etmek istediği ödevi yazdım. Sonradan anladım ki yaptığım yalnış. Çünkü o kardeşimiz okul bitiminde bu diplomaya sahip olacak ama bilgi yönünden 0 olacak. Yani geleceğin programcıları değişen sistem teknolojileri ve bilgi yönünden geri kalacak. Benim sana tavsiyem 1 delphi kitabı edin ve oku.Daha sonra anlayacaksın ki herşey çok basit ve kolay. Sana delphi ile başladığın bu yolda başarılar diliyorum. Tekrar söylüyorum beni yalnış anlama. Forum içerisinde örnekler mevcut sanırım.

ayrıca hazıra konma gibi bir niyetim yok benim amacım öğrenmek şunu şöyle yap die tarif ederseniz bende öğrenmiş olurum hem sizin açınızdan hemde benim açımdan en güzeli olur

çok teşekkür ederim yalnız son bir sorum olacak database desktop da create table penceresinden table type seçeneklerinden hangisini seçmem gerek benim veritabanım access accdb uzantılı

ilgilendiğiniz için çok teşekkür ederim

bilgilendirdiginiz için tsk ederim....
benim bir problemim var ben programda tabbednotebook kullandim evrak,sözlesme,faturalar seklinde ama benden evrak bölümünde bulunan evrak türü alanini açilir yani combobox yapip sözlesme ve faturalari bunun içerisine yerlestirip ordan seçilen seçenege göre o bölümlerin açilmasini hatta bu evrak türü alanina sonradan kendilerinin ekleme yapabilmelerini istiyorlar ve benim bunu nasil yapacagim hakkinda hiç bilgim yok bana yardim edebilir misiniz? :-\

combobox ın on dropdown ınan aşağıdaki kodu yazarsan TXT dosyasından her satırı okur ve combobox içine atar

var
a:string;
f:textfile;
begin
     assignfile(f,'C:\Program Files\Test Programi\db\tur.txt');
                if fileexists('C:\Program Files\Test Programi\db\tur.txt')    then
                begin
                reset(f);
                while not eof(f) do begin                                  readln(f,a);
                Form1.DbComboBox1.Items.LoadFromFile('C:\Program Files\Test Programi\db\tur.txt');
                end;
                closefile(f);
end;
end;

.......

 Hem dosyayı AssignFile ile açıyorsunuz ama açtıktan sonra FileExists ile kontrol ediyorsunuz, ardından bir döngü ile dosyadan satır satır bilgi çekiyorsunuz ama çektiğiniz veriyi hiçbiryerde kullanmıyorsunuz ve dosyadaki satır sayısı kadar dönüp LoadFromFile çağrımını yapıyorsunuz. Ardından da bir bilmeyene yol göstermiş oluyorsunuz.(!) Sizi de tebrik ederim.

Alıntı yapılan: thelvaci - 02 Ağustos 2010 12:23:29

Alıntı yapılan: lazanya - 02 Ağustos 2010 10:51:46

combobox ın on dropdown ınan aşağıdaki kodu yazarsan TXT dosyasından her satırı okur ve combobox içine atar

var
a:string;
f:textfile;
begin
     assignfile(f,'C:\Program Files\Test Programi\db\tur.txt');
                if fileexists('C:\Program Files\Test Programi\db\tur.txt')    then
                begin
                reset(f);
                while not eof(f) do begin                                  readln(f,a);
                Form1.DbComboBox1.Items.LoadFromFile('C:\Program Files\Test Programi\db\tur.txt');
                end;
                closefile(f);
end;
end;

.......

 Hem dosyayı AssignFile ile açıyorsunuz ama açtıktan sonra FileExists ile kontrol ediyorsunuz, ardından bir döngü ile dosyadan satır satır bilgi çekiyorsunuz ama çektiğiniz veriyi hiçbiryerde kullanmıyorsunuz ve dosyadaki satır sayısı kadar dönüp LoadFromFile çağrımını yapıyorsunuz. Ardından da bir bilmeyene yol göstermiş oluyorsunuz.(!) Sizi de tebrik ederim.

ben hiç olmazsa işe yarar bir yol göstermeye çalışıyorum. sen de anadan doğma programcı olmadın herhalde. bir zamanlar sen de böyle başlamıştın. nasıl oluyor anlatta biz de bilelim. nasihat verme, yardım et.

Yardımcı olmama mı ? Bunları bana mı söylüyorsunuz ? Ayrıca yol göstermek sizin yaptığınız gibi olmaz, kopyala/yapıştır kod kullanımı ile de bilgi elde edilmez. Önce meselenin derinliklerine inmek gerekir. Birilerine yol gösterici olmak istiyorsanız, önce özenli olacaksınız. Verdiğiniz örneklerle yanlış istikamete sevk etmeyeceksiniz. Önce kendiniz bileceksiniz ki, ışık tutabilesiniz. Bilmiyorsanız da, susacaksınız.

 Ben'de dediğiniz gibi anadan doğma programcı olmadım. Programlamaya başladığım zamanlarda Türkiyede internet dahi yoktu. BBS denilen iletişim ağı vardı. Türkçe bir kaynak bulmak ise nerede ise imkansız idi. Tüm bu zor şartlar altında, aldığım 100$ maaşın yarısına bir yabancı kitap alarak; o kitabı otobüste, minübüste, fırsat bulabildiğim heryerde okuyarak; internet imkanımız olmadığı için Delphi'nin Help'ini ve kaynak kodlarını dibine kadar inceleyerek öğrendik. Evet annemizin karnında öğrenmedik.

 Sizin gibi arkadaşlara yardımcı olmak için programlama.com gibi bir sitenin kurulumunda ve desteğinde bulunduk, çeşitli forumlarda insanlara Allah rızası için yardım etmeye çalıştık. Her daim anafikrimiz, balık tutmayı öğretmek idi, balık yemeyi değil. Bu vesile ile çok eleştirildik ve belki de sizin yaptığınız gibi hakarete uğradık. Ama hâla elimizden gelen bir şey varsa paylaşmaya çalışıyoruz.

 Ama siz değerli programcı(!) arkadaşlarımın bilmesi gerekeni bir türlü izah edemedik sanırım. Mesleğinize saygı duymak, yaptığınız işe değer vermek, araştırmak, araştırmak, araştırmak..

 Bir veritabanı bileşeninin bir diğerine aktarılmasını istemek; (misal bir gridden bilgiyi diğerine aktarmak), bir dblookup bileşenine LoadFromFile ile veri yüklemek bunlar sizin bakış açınızla sanırım normal yaklaşımlar. Öncelikle düşünülmesi gerekenin veritabanı tarafında olduğunu bilmeden, Delphi component toolbardan componentleri forma sürükleyip bırakarak; bunların sınıf hiyerarşisini öğrenmeyerek, veritabanı programlamanın detaylarını bilmeyerek, pointer'ların ışık kaynağı olan lazer işaretleyiciler olduğunu sanarak acaba kime ve ne kadar yardımcı olunabilir bilemiyorum.!

Sözüm sizin nezdinizde tüm programlamaya özensiz yaklaşanlara olsun. Son olarak, birilerine hakaret etmeden önce sizin için ne yazıldığını bir kaç kere okumanızı, ne denmek istendiğini biraz anlamanızı ve hatalarınızı işaret eden kişilere hakaret etmemenizi rica ederek bitireyim.

 Programlama; özen gerektiren bir sanattır. Herkes resim yapabilir, ama sadece özel insanlar hatırda kalıcı eserler bırakabilir.