Delphi Forum

Selamlar. - Daha önce bir başlık altında problemimin çözümünü bulduğumu değerlendirdiğimden konuyu kapatmıştım fakat MicroSoft(R) WindowsXP 'de bu bug'ını gidermiş. Sistemim WinME ve sorun devam ediyor, bunu geç farkettim. WinME lisansım var XP 'nin yok. - WMF dosya uzantılı resim dosyalarını diğer ...

Selam. - Hımm. Mesajı erken yazmışım. Önceki hale göre yazmıştım. // İptal // - Hatan AND'den önce ve sonra boşluk bırakmamış olman. - Takip eden satırlarda tırnak imlecinden sonra bir boşluk bırak. - SQL ile ilgili hatalar aldığında, hatadan önce mevcut sonucu mesaj penceresinden görmek için Query'...

- Evet aynen öyle.. - Senin için bir örnek hazırladım. Elime yapışmadı yani 8) - Bildiğin şeyler sanıyorum ama başka okuyanlar da bilmeyenler de öğrensin istedim. - Özellikler isteyebileceğin ekstra özelliklerle donattım. - Her Tab'a başka bir renk. - Seçili Tab'ın rengini Siyah olarak değişrimek - ...

@Admin haklı. - Ben de yeni anladım. - Doğru yöntem de @Admin 'in dediği gibidir. - Ayrıca Veritabanınızın türüne göre yazacağınız bir fonksiyon ile program içinden Veritabanı Create olayına girerseniz, programınızın dinamizmi açısından artı puan olur. - Ama mevcut sistem ilerledi, yeni sistem kurm...

- Değerlerini sıfırlamak deyimiyle neyi kastediyorsunuz ? - Bunu soruyorum çünkü, yeni kayıt için Append veya Insert komutu verdiğinizde, değerler boş olarak yeni bir kayıt eklenir. - Default (Varsayılan) değerleriniz mi var da onları mı versin diyorsanız tablo'nun AfterInsert eventinde bu işlemi ya...

Selam. - Aslında çözümü bulmuşsun. Canvas.Brush.Color senin istediğin işi yapıyor. Sorun nedir ? - Belki PageControl'ün OwnerDraw'ını True yapmayı unutmuş olabilirsin. // Düzenleme // - Haa bir de unutmuşum, umarım tüm bunları OnDrawTab eventinde yapıyorsunudur yoksa her paint olayında yaptığın deği...

Video Codecler: Reg.RootKey := HKEY_LOCAL_MACHINE; Reg.OpenKey('\System\CurrentControlSet\Control\MediaResources\icm', False); Audio Codecler: Reg.RootKey := HKEY_LOCAL_MACHINE; Reg.OpenKey('\System\CurrentControlSet\Control\MediaResources\acm', False); DivXTurk programı için aramıştım zamanında uma...

Selam.

- Kaç tane Table / Query var ve hangilerini aynı veritabanı için kullanıyorsun ?

- Bunları soruyorum çünkü, yanlışlıkla Query'den sildiriyor da Tablo'dan tetiklenmesi bekliyor olabilirsin ?

Selam.

Evet bir şekil şöyle.

TForm1. yazısının silinmiş halini yukarıya tanımlara eklemeniz lazım.

ya da en basiti, bu satır üzerine gelip CTRL+SHIFT+C tuş kombinasyonuna basın.

procedure SorguYap(Edit1, Edit2: String);

satırını sizin yerinize delphi IDE halledecektir.

@freeman35 hızla cevap yazmışsın zaten.

- Benimki de benzer bir cevap oldu kusura bakma.

@loxka freeman35'in cevabını da uygulayabilirsin fakat parametre aktarımını dediğim gibi isme yap. Tek parametre olursa hata olabilir.

Selam. - Anladığım kadarıyla bu işi SQL sorgusunda yapmalısınız. - Bu durumda Parameter aktarımını; parametre index'i yerine direkt parametre isminden yaptırın. Örnek : procedure TForm1.Edit1Change(Sender: TObject); begin SorguYap(Edit1.Text, Edit2.Text); end; procedure TForm1.Edit2Change(Sender: TO...

- Bunları hazırlamak size düşüyor. Ya da varsa hazır bir üçüncü parti bileşenle.

- RichEdit'e ait OnSelectionChange eventinde. Satır ve Sütun değerlerini okuyup sayfa sayısını bu satır sayısından çıkarımla buldurabilirsiniz. Bu şekilde de statusbar'a hangi sayfada olunduğunu yansıtabilirsiniz.

Selam. - Resimlerin kaydını Veritabanına sizin programınız mı yaptı, yoksa başka bir programın veritabanını kullanarak raporlamak mı istiyorsunuz. - Bunları soruyorum çünkü resimler BlobStream kayıtlı olabilir. Bu durumda önce veritabanından okutup bir Stream'e aktarılmalı ve resim formatına göre bi...

@fahrettin haklı. CD'ye yazamazsın. - Programında yapacağın bir modifikasyonla bunu ancak idare eder hale getirebilirsin. Nasıl mı ? - SQL ile Join zinciri kurmak üzere HDD'de gecici bir veritabanı ile CD'deki yazılamaz veritabanını birlikte okutarak işini halledebilir, sonra bu veritbanıyla CD'dek...

Selam. - DLL'den çağrı yaptırırken, AOwner diye nitelendirilen menunun oluşturulacağı formu da parametre olarak verin, sorununuz çözülür. // Örneğin Form1 formunuza menu Eklenecek Function MenuEkle( Form:TForm; MenuAdi : String) Boolean; Var Menu : TMenu; begin Result := False; Try Menu := TMenu.Cre...