Delphi Forum

Ne demek buyrun gelin yada ben gelirken mi getireyim...

Merhaba..
Söz verip (kesin değil demiştim ama) gelemeyenlere ne ceza var

Peki yol değilde fotograf binary formatta kaydedilmişse? Nasıl geri yüklenir?
Ve binary nasıl kaydedilir?

Ya ewt bu fotograf kaydetme sorun. Delphide hiç uğraşmadım ama C# da beni çok zorlamıştı. Bu konuda bilgisi olan varsa makale bekleriz

Tabiki

Merhabalar.... Ben bu tür problemleri şu şekilde hallediyorum. Kullanıcı hatasını sıfıra indriyorum... gridimin altına bir butonbar yapıyorum. EKLE , KAYDET ,VAZGEÇ, SİL ,DEĞİŞTİR ,KAPAT EKLE gridi disable ediyorum sil, değiştir, kapat disable kaydet, vazgeç enable txtleri boşaltıp focus VAZGEÇ grid...

Bende apro ile çalışıyorum

text gönderirken sadece

com.PutString(stringdeğişkenin);

main formun create eventine bende bu kodu yazmıştım. Şimdilik sorun çıkarmadı.... procedure Tfrmain.FormCreate(Sender: TObject); var Sem: THandle; begin Sem := CreateSemaphore(nil, 0, 1, 'PROGRAM_NAME'); if ((Sem <> 0) and (GetLastError = ERROR_ALREADY_EXISTS)) then begin CloseHandle(Sem); ShowMessa...

6. semineri bende indirmeyi denedim. 2 gündür blokeliydi. Şimdi ise sayfa görüntülenmiyor...

Yani bu durumda sadece veritabanında bilgi türkçe olacak. İşlemler türkçe olmayan karakterler üzerinde yapıalcaksa bence veri girilirken süzülebilir...

Kulagı biraz tersten gostermek gibi oalcak ama Query ile search etmedikce. Tabloda konumlanarak arıyabilirsin. Her konumlandığın kayıdıda bir değişkene alıp aynı fonksiyonla değişkeni convert edip kontrol edebilirsin....

var durum: string; // veritabanında hagi tipte tuttuysanız begin if gdSelected in State then exit; durum := grdcikis.DataSource.DataSet.FieldValues['KOLON_ISMINIZ']; if (durum = 'KIZ') then grdcikis.Canvas.Brush.Color := clRed //Kız öğrencilerin satırını kırmızı yap else grdcikis.Canvas.Brush.Color...

Delphi menulerinden
component\install packages

ADD dedikten sonra:

C:\Program Files\Borland\Delphi7\Bin\dclqrt70 .bpl

dosyasını seçip
Ok leyiniz...
Kolay gelsin.

Merhaba ben database e küçük harflerden oluşan kayıt girilmesini istemiyordum onun için editlerin keypress eventlerinde key:=buyut(key); şeklinde çağırdığım bir fonksiyon yazmıştım function buyut(krk:char): char; var a: char; begin if not (krk in ['ı','ğ','ü','ş','i','ö','ç']) then a:=(uppercase(krk...

Yazıcınız comport yazıcıysa satır satır bir text dosyaya yazar gibi yazabilirsiniz...