Delphi Forum

SELECT DISTINCT(KD.DSTOK_NO),KD.STOK_ADI,KD.DSTOK_NO, DST.STOK_ADI DST, (SELECT Div(SUM(D.MIKTAR*D.BIRIMX), B.BIRIMX) FROM STYEDETA D JOIN STOKKART S ON D.STOK_NO = S.STOK_NO JOIN STOKYERI Y ON Y.STOK_YERI_NO = D.STOK_YERI_NO LEFT OUTER JOIN STOK_BIRIMI(S.STOK_NO,D.BIRIM,1,D.CRC,0) B ON 1 = 1 JOIN ...

SELECT DISTINCT(KD.DSTOK_NO), D.STOK_YERI_NO, Y.STOK_YERI_ADI, D.STOK_NO, D.DSTOK_NO, B.BIRIM, S.STOK_KODU, S.STOK_ADI, K.STOK_ADI DSTOK_ADI, Div(SUM(D.MIKTAR*D.BIRIMX), B.BIRIMX) MIKTAR FROM STOKKADE KD JOIN STYEDETA D ON KD.DSTOK_NO=D.DSTOK_NO JOIN STOKKART S ON D.STOK_NO = S.STOK_NO JOIN STOKYER...

Freeman'ın önerisi doğrultusunda; eğer MASAADI field içeriği örneklerde olduğu gibiyse kod aynen şu şekilde olacaktır.

DBMAS := Copy(DatasetAdı.FieldByName('MASAADI').AsString,6, Length(DatasetAdı.FieldByName('MASAADI').AsString)-5);

Kolay gelsin.

Delphi XE5, Firebird 2.5 ve Unidac 6.1.6 kullanıyorum. Server ve network yoğunluğuna göre timeouta düşüp kesinti yaşıyorum. Forumda ve başka yerlerde bulduğum çözümler derdime derman olmadı maalesef. Timeout belirleyebileceğim herhangi bir property ya da fonksiyon bulamadım. Timeout özelliğini nerde...

Bu mesaj windows güvenlik duvarından kaynaklı bir mesajdır, ama genelde ağ erişimlerinde karşılaşırız.
Localhost nasıl verir anlam veremedim. Windows güvenlik ayarlarından izinleri ayarlayıp dene bence.

Yukarıdaki mesaj diyor ki: Tüm kayıtlar okunmadan, kayıt eklenmeye çalışıldı.
Transaction kullanmak bu problemi çözer mi?

Yok mu bir fikri olan arkadaşlar?

Delphi XE5 ve firebird 2.5 kullanıyorum. Konu başlığında belirtmiş olduğum 'attempted to append a record before all records have been read from Data Driver' hatası ile karşılaşmaktayım. Append ya da insert yaparken karşılaşıyorum. Firebird erişimi için unidac bileşenlerini kullanıyorum. Konu hakkınd...

DBGrid1 bir DataSource a ve o DataSource da bir table ya da Query'ye bağlı.
İşte o table ya da query'yi kastediyorum dataset derken.

Hatta o kodu DataSet->AfterScrool eventi altına yazarsan çok daha güzel olur.

Arkadaşlar; Delphi yi kaldırıp tekrar kurdum, sonrasında komponentleri yüklediğimde ben yine aynı problemle karşı karşıyayyım. [dcc32 Fatal Error] uretim.dpr(1): F1027 Unit not found: 'System.pas' or binary equivalents (.dcu) 2 günüm heba oldu ve bu 3. günüm. Allah rızası için sebebi ve çözümü hakkı...

Doğru yaptığımı düşünüyorum ama olmadı.
Ben de kaldırıp tekrar kuracağım.
Teşekkür ederim.

Üstad rgd karşılaştırması yaparak Blue değerine bakıp 0-255 aralığında beyaz mı değil mi karar verebilirsin. 0: beyaz 255 siyah sen, rgb nin blue değerinin 120 üstünde kalanı renkli, altında kalanı beyaz olarak kabul edebilirsin. Tabii bunu yaparken pixelleri yeniden oluşturup 120 nin altında ve üst...

ikra üstad Allah razı olsun çabalarından ötürü. Fakat çözüm olmadı problemime.

Üstad, cehaletimi mazur gör.
Project/Options/Directories/Conditionals/Source Path:
Delhip XE5 te ben bahsi geçen yeri bulamadım.