370 uygun sonuç bulundu

gönderen ofenX
19 Eyl 2005 10:20
Forum: Programlama
Başlık: TNotebook ActivePage Parentli Nesnelerin Tespiti
Cevaplar: 4
Görüntüleme: 994

Merhaba,
O component Ttabset componenti ile kullanılıyor diye hatırlıyorum.

Kod: Tümünü seç

tabset1.tabs:=notebook1.pages;
gibi kullanılıyor. Siz sorunununuzu hallederken bu iki componenti göz önüne alarak çözmeye çalışın.
İyi çalışmalar.
gönderen ofenX
16 Eyl 2005 03:47
Forum: Programlama
Başlık: Dışardan procedure çalıştırmak
Cevaplar: 14
Görüntüleme: 4228

Merhaba, Video oynatıcı değilde mdi olarak çalışan rtf editörü olarak düşününsek mesela. Her yeni rtfye tıkladığımda yeni program değilde açık olan programa bir tane daha mdichild form yaratsa. mrmcop hocamızın örneğinde biraz değişiklik yaparak. Procedure TOrnekProgramFormu.Calistir; Var INIDosya :...
gönderen ofenX
16 Eyl 2005 02:53
Forum: Programlama
Başlık: Dışardan procedure çalıştırmak
Cevaplar: 14
Görüntüleme: 4228

Merhaba, mrmcop hocam sayenizde bir şeyler öğrenelim dedik. Sizin örneği denemeye çalışıyordum. Program çalıştığı gibi kapanıyordu. Programimiz := FindWindow('TOrnekProgramFormu', Nil); yerine, Programimiz := FindWindow('OrnekProgramFormu', Nil); şeklinde yaptım. O zaman labelin değiştiğini görüyoru...
gönderen ofenX
16 Eyl 2005 10:20
Forum: Programlama
Başlık: Dışardan procedure çalıştırmak
Cevaplar: 14
Görüntüleme: 4228

Merhaba, Programı herseferinde kapatıp tekrar açmak değilde çalışan programın içindeki bir fonksiyona ulaşmam gerekiyor. sizin tam olarak ne yapmak istediğinizi anlayamadım. Şöyle düşünün 1 adet clock.avi 1 adet cool.avi dosyanız var. (İkisi de win xp de c:\windows ta var.) siz clock.avi ye bastığın...
gönderen ofenX
14 Eyl 2005 07:47
Forum: Programlama
Başlık: Deadlock hatasını Türkçe olarak nasıl verdirebiliriz?
Cevaplar: 16
Görüntüleme: 4313

Merhaba, Mesaj vermemesi başka bir hata olduğundandır. Siz sadece deadlock olursa mesaj ver demişsiniz. Ya diğer hatalar ? Yukarıdaki kodu aşağıdaki gibi değiştirirseniz. Deadlock dışındakini de verecektir. procedure TForm1.Button1Click(Sender: TObject); begin try IBDataSet1.Post; except on E: Excep...
gönderen ofenX
14 Eyl 2005 06:57
Forum: Programlama
Başlık: midi form
Cevaplar: 1
Görüntüleme: 710

Merhaba, Bir tane Tmainmenu bileşeni atıp deneme yapabilir misiniz? Sadece forma alın bir özelllik ataması yapmadan deneyebilirsiniz. Bir child forma ekrana kapla dediğinizde Mdı formun başlığının hemen altına kapatma (X) butonu bırakıyor. Onları kullanarak child formu kapatma veya minimize etmeyi b...
gönderen ofenX
14 Eyl 2005 06:24
Forum: Programlama
Başlık: Deadlock hatasını Türkçe olarak nasıl verdirebiliriz?
Cevaplar: 16
Görüntüleme: 4313

Merhaba,
try exceptin sonucunu görmeniz için ya programın exe sini çalıştıracaksınız. Ya da Tools/Debugger Options dan Language Exception sekmesine gidip
Oradan alttaki Stop on delphi exception ın onay ını kaldırmalısınız.

Bu şekilde bir deneyin.

İyi çalışmalar.
gönderen ofenX
14 Eyl 2005 05:46
Forum: FireBird
Başlık: Firebird'de matematik islemi
Cevaplar: 12
Görüntüleme: 2406

Merhaba,
yukarıdaki kodu eksik göndermişim. şu an düzelttim ve 1164 ü veriyor.

İyi çalışmalar.
gönderen ofenX
14 Eyl 2005 05:25
Forum: FireBird
Başlık: Firebird'de matematik islemi
Cevaplar: 12
Görüntüleme: 2406

Merhaba,

Kod: Tümünü seç

(miktar-(miktar*iskonto/100))+((miktar-(miktar*iskonto/100))*kdv/100)


şeklinde yaparsanız istediğiniz sonucu verir. Verdiğiniz rakamlarla denedim. Sizin 1164 ü çıkardı.

acele ile yanlış yazmışım düzellttim. :oops:
İyi çalışmalar.
gönderen ofenX
14 Eyl 2005 05:05
Forum: Programlama
Başlık: Dışardan procedure çalıştırmak
Cevaplar: 14
Görüntüleme: 4228

Merhaba, Kendi nickim ile ilk defa bir arkadaşıma yardımcı olmanın sevincini yaşıyorum. :lol: Umarım işinize yarar. Benim bulduğum çözüm ilk yüklenen kopyayı kapatıp, yeni kopyalanan kopyanın çalışmasın devam etmesini sağlamak ve verilen parametreyi yüklemek. Denediğim programa 1 ad. listbox, 1 ad p...