Delphi Forum

malesef kendim önizleme ekranı hazırlayamıyorum çünkü Report Builder ı kullandığımız paket programın içerisinde yüklü şekilde.

Bende bunun Runtime Design özelliğini kullanarak yeni raporlar yaratmaya çalışıyorum.

Ancak bu raporlama aracının OnPreview gibi bir eventi yok ekrana görüntüyü getirdiği ...

Selamlar,

Ben Report Builder da bir rapor hazırlıyorum. Antetli kağıda basılacak, antetli kağıtta yazılı olan bilgileri raporu ön izleme yaptığında görsün ama yazdır dediğimde bunları yazdırmasın istiyorum.

Kısaca bazı yazılar ve çizgiler monitörde görünsün ancak kağıda basılmasın. Aradım taradım ...

malesef bende hiç bir değişiklik olmadı forumdan araştırdığıma göre Font ayarlarını Tahoma da yaptım fakat değişen hiç bir şey yok.

zeos componentiyle bağlanıyorum şimdi TNT componentini indirdim onu deneyeceğim yardımlar için teşekkürler.

iyi günler,

Ben bir internet sitesine ait MySQL veri tabanına Delphi den bağlantı atıyorum fakat dataları getirirken türkçe karakterler bozuk çıkıyor.

Delphide yaptığım program ile veri giriyorum bu sefer programda düzgün çıkayor fakat bu seferde web sitesinde türkçe karakterler bozuluyor.

Veri ...

Selamlar,

Ben DbLookUpComboBox içerisinde listenin en üst kısmında listelediğim verilerin alan isimlerinin görünmesini istiyorum bu konuda yardımcı olabilir misiniz ?

client teki listbox içerisindeki nesneleri server tarafına aktarmak için bi alternatif sunacak var mı ?

satır satır göndermek istemiyorum doğrusu gerçi bir kerede yollayamazsam son çare olarak bunu deneyeceğim ama son bir kere daha sorayım dedim.

Bir bilgisyardan diğerine kendi oluşturduğum bir veri paketi içerisinde Tstringlist kullanıyorum ancak bu veriyi diğer tarafa ya gönderemiyorum yada okuyamıyorum.


type
CLexelist = Packed Record
Liste : TStringList;
CLuser : String[25];
CLcomp : String[25];
end;


Gelen Veriyi okumaya ...

benim şimdi tek istediğim server programının açık olup olmadığını anlamak. Buna göre connect komutu verilecek yada verilmeyecek.

bu işe yaramıyor CL.connect; satırını okumuyor bile.
while döngüsünde false değerini arattırıyorum bu sefer eski soket hatası ile karşılaşıyorum.

benimde aklıma geldi fakat yemiyor.

try

CL.connect;

except
end;

tarzında bişi denedim en basitinden, ancak işe yaramadı.

bi server / client program yapmak istiyorum.

Clientlerden server a bağlantı mesajı gönderiyorum ama server açık olmadığı zaman doğal olarak hata veriyor.

Ben bu hatayı görmezden gelmesini ve connect olana kadar sessizce serverı aramasını istiyorum.

önerisi olan ?

Ewt bu konu üzerinde biraz araştırma yapayım.

Bu konu üzerinde çalışmış olan arkadaşlarında izledikleri yöntem fikirlerini bekliyorum.

Herkese iyi çalışmalar..

Bunun için şöyle birşey hazırladım;


var
jpgimg : TJPEGImage;
mempic : TMemoryStream;
begin

jpgimg:=TJpegImage.Create;
jpgimg.assign(Image1.Picture.Bitmap);

mempic:=TMemoryStream.Create;
jpgimg.savetostream(mempic);

mempic.Position:=0;
mempic.SaveToFile('c:\dadadad.jpg'); /// Sorun yok ...

Ben Client makinaların ekran görüntüsünü alacak birşey yazıyorum. Ancak hazırladığım packed içerisine eklediğim bitmap dosyası servera gelene kadar kayboluyor :P

Kısaca;


Type
TSendScreen = Packed Record
Screen : TBitmap;
MouseXY : TPoint;
end;

procedure TForm1.Button1Click(Sender: TObject ...