Delphi Forum

Ben Resmi dairede çalışıyorum.Kimlşk paylaşım sistemind değişiklik yapılmış. Ama ben yenisini uyarlayamadım. Yardımcı olursanız sevinirim.
http://212.175.169.157/sbkpsws/service.asmx linkini inceleyebilirsiniz. Orjinal functionlar burada;

Önceki kodlar;

procedure TForm1.FormCreate(Sender: TObject ...

Ben resmi bir kurumda çalışıyorum. 320 adet sabit kayıdım var. ben kumanda masasından kayıtla ilgili işlem yaptıkça önceleri ilek kayıtta olsun cursor. Fakat Dbgrid'in ortasına geldiğinde cursor sabitlensin daha sonra son kayıtlarda cursor aşağıya doğru insin istiyorum. Bu işlem için Timer nesnesi ...

Ben bir kamu kurumunda çalışıyorum. resmi bi iş için lazım. Tek boyutlu bi dizideki birden çok kayıtları yani mükerrer kayıtları bulmam lazım. Excel dosyasını açıp diziye aktardım(Örn TC NO gibi) . Ama çift kayıtları bulamadım. Yardımcı olursanız sevinirim.

Şididen teşekkürler.

Twain sürücüsü ile resimleri For döngüsü ve
TBitmap(ImageList[CurrentImage]).SaveToFile(isim)
komutuyla kaydedebiliyorum. Ama hafızadaki resimleri nasıl silecem Bi türlü bulamadım. Yardımcı olursanız sevinirim. Şimdiden teşekkürler

Kolay Gelsin....

http://www.tokatsm.gov.tr/mehmet/rapor.jpg
resimdeki gibi bi rapor hazırlamam lazım.
Sağlık Ocakları Detailbantta, diğerleri subdetail olarak yaptım. ama subdetaile bağlı ikinci subdetail saçmalıyo.
1) 100 sağlık ocağı ve buna bağlı 200 sağlık ocağı bölgesi ve bölgeye bağlı köyler
2) 100 sağlık ...

S.A.
Ben resmi dairede çalışıyorum. şubem için bi rapor hazırlamam lazım.
benim şöyle bir tablo sıralamam var;

1. Table1.dbf ->Master
a)table2.dbf
* table3.dbf
b) table4.dbf
* table5.dbf

yani table2 ve table4 table12e bağlı, table3 table2 ye, table5 table4'e bağlı.

Bunları quick reportta ...

Bir adet detail ve 3 adet subdetail bant ile hazırladığım raporum çalışıyo. ama sizden istediğim şey detail banta kayıt yazıp sub detaile ayrıntılar yazıldıktan sonra yeni sayfaya geçip diğer kaydı yazsın. yani her detail bant yeni bir kayıt olsun istiyorum. yardımcı olursanız sevinirim.

Mehmet ...

Delphi7 lisansı almak istiyorum. Ama bir türlü bulamadım. Alabileceğim bir adres veya telefon numarası bilen varsa lütfen bana yazsın.
Şimdiden teşekkürler.
Kolay gelsin.

Datmax 4203 yazıya Canvas.TextOut medodu ile veri gönderiyorum. Fakat bu konuda hiç deneyimim olmadığı için ayarlarını beceremedim. İstediğim şu. Etiketi herhangi bir konumda yazıcıya taktıktan sonra otomatik olarak etiketin kesme noktasında konumlanacak ve yazdırma bittikten sonra da bir etiket boş ...

Edit1.Text:=FloatToStr(Date1-Date2)
Kolay geslin

Form üzerine bir adet memo ve bir adet buton koyalım. memo alanı boş olsun. button olayı(nasıl olack bilmiyorum). projeyi exe haline getirelim. çalıştırdıktan sonra memo alanına aşağıdaki kod parçasını yazalım. butona bastığımızda nasıl bir kod yazmalıyım ki memodaki kodlar çalıştırılsın.

Table1 ...

QRANGLBL.pas dosyası indirdim Qranglbl.q2x dosyası Qranglbl.inc olarak değiştirdim Component->Install Component nesünüden Into new Package yi kullanarak derlemeye çalıştım fakat beceremedim. Hatalar veriyo (dclusr60.bpl) Tools menüsündeki ayarları da değiştirdim bir türlü olmadı. yardımcı olursanız ...

Husoedit bileşenini indirdim, ama bir türlü delphi6 ya eklemeyi beceremedim. yardımcı olursanız sevinirim.

ColumnHeaderBand1->Başlık
DetailBand1->Master Dosya
QRSubDetail1->Detail Dosya


buraya kadar herşey normal.
*Fakat ben QRSubDetail1 ile PageFooterBand1 arasına sabit değerler koymak istiyorum.
*Child koydum QRSubDetail1'in hemn altına yapıştırıyo. öyle bir bant koymalıyımki QRSubDetail1 ile ...

Delphi 6 kullanıyorum. RC252_D6.zip diye bir update indirdim. çalıştırdım ve install sonlandırıldı gibisine bir mesaj veriyor.