Delphi Forum

@mrmarman abi teşekkürler. Ufak bir düzeltme yapmak istiyorum abi müsadenle //Procedure FormDC(Form:TForm; Bitmap:TBitmap); Procedure FormDC(Form:HWDN; Bitmap:TBitmap); var DC, DCWind : HWND; rc : TRect; begin // DCWind := Form.Handle; DCWind := Form; GetWindowRect(DCWind, rc); with Bitmap do try Wi...

gkimirti yazdı:Ellerine sağlık Muharrem hocam,
peki eski haline nasıl getirebiliriz formun gri halini

Gökmen hocam ben denemelerimde formu refresh edince eski halini alıyor.

@mrmarman abi ellerine sağlık..

Bende dün bu konuda bir araştırma yapmaya başlamıştım ve bugün burada sen yayınlamışsın abi.

İşte ben bu forumu neden bu kadar çok seviyorum şimdi daha iyi anladım

merhabalar;

Richeditin PlainText özelliğini bir araştırın , problemin yanıtı orada...

Kolay gelsin.

@Asri paylaşımın için teşekkürler..

@rsimsek abi bu yaşlılık konusu neden seni bu kadar alakadar etti acaba Sen daha hepimize taş çıkartırsın

Recep abi bu işin şakası alınmayasın ama gerçekten yaşlanmak aslında kötü bir şey değil...

Merhaba; Ben böyle durumlarda ilk önce sıralama yapılan colon sayısını öğreniyorum cxGrid1DBTableView1.SortedItemCount daha sonra sıralama A..Z - Z..A hangisine uygun olarak yapılmış onu buluyorum.. If cxGrid1DBTableView1.SortedItems[0].SortOrder=soAscending then ve gerekli kodları kendim oluşturuyo...

@serim sen olayı karıştırdın galiba monthof sql cümle içinde kullanılamaz.. delphide aşağıdaki gibi ayın ilk tarihini ve son tarihini öğrenebilirsin.. Var Ay:Integer; SonTar,IlkTar : String; begin Ay:=MonthOf(Date); IlkTar:='01.'+IntToStr(Ay)+'.'+IntToStr(CurrentYear); SonTar:=IntToStr(DaysInMonth(D...

mrb;

Delphi Türkiye Sitesindeki Makaleler yazdı: MonthOf : Verilen tarihin ayını döndürür. Yani sonuç 1 ile 12 arasında bir değer olmalıdır.

MonthOf ( Date ) = 9

Konuyu şöyle açıklayayım. Programınızın başlangıcına (varsayalım onshow yordamına) yazacağınız THOUSANDSEPARATOR := '.'; DecimalSeparator := ','; kodları ile o uygulamanın kullanacağı ondalık ve binlik ayıracını belirlemiş olursunuz. Eğer Bölgesel ayarlarda bu ayıraclar farklı ise diğer uygulamalar ...

bununda doğru olduğunu sanmıyorum. ben ondalık haneyi varsayılan virgül kullanıyorum. başka proğramlar burayı değiştirdiğinde sorun çıkacaktır. ve başıma geldi. bir program adını hatırlamıyorum. sürekli bu ayarları değiştiriyordu. sonunda sinirlendim ve sildim pro yu. yani auarların varsayılan üzer...

Merhabalar; Programınızı biraz inceledim. Öncelikle bölgesel ayarları kullanıcıya ayarlatmak pek doğru değil kendiniz programın açılışında ayarlatsanız çok daha güzel olacakdır. Bir de hesap açılan bir masaya sipariş kaydedildikten sonra silme koymamışsınız. Eğer yanlışlıkla çay yerine kola eklendiy...

Pardon ben Database yerine tablo anlamışım...
Ayrıca aşağıdaki linkte detaylıca anlatılmış..
http://www.delphiturkiye.com/index.php? ... untime.htm

Vertiabanı bağlantılarını yaptıkdan sonra IbQuery2.Close; IbQuery2.SQL.Clear; IbQuery2.SQL.Add('CREATE TABLE YEDEKLEME ('); IbQuery2.SQL.Add('YEDEK_NO INTEGER NOT NULL,'); IbQuery2.SQL.Add('YEDEK_TARIHI DATE);'); IbQuery2.ExecSQL; gerekli sql kodları yazarak yapabilirsin.. Ancak tabi bu işlemi yapar...

Merhabalar;

Kullandığınız yöntem çok sağlıklı bir yöntem değil.
Böyle durumlarda en sağlıklı yöntem ya autoincrement alan tanımlamak ya da refenrans numaranızı başka bir tabloda tutup sürekli oradan takip etmek olacaktır.

Kolay gelsin..

@meron06; Müşteri numarasına göre gruplandırmanda mümkün ancak 10-19 arası müşteriler gibi yapabilirsinde 10-19,20-29.. arası kodlar aynı grupda olsun dersen orasını bilemiyorum.. Mesela grup bandının şartına [Copy([IbDataSet1."KODU"]),1 Onlar hanesi ,1)] yazarsen 99a kadar kodları gruplan...