Delphi Forum

Bir tane şablon dosya oluşturup. Onun içine kodlar yazarak kullanabilirsin. ben bu şekilde kullanıyorum. Ön izleme olayına hiç girmedim ama yazdırdıgın bilgiyi ön izlemede de sorun olmayacaktır. [002 ] [004 ] [008 ] [005 ][006 ] [307 ] [181 ] [182 ] [303 ] [201 ][202 ][204 ] [205 ] [211 ][212 ] # --...

Sayın xxxjedixxx , Acaba sizin kullandığınız delphi sürümü nedir? Ben bu işlemi XE7 de denedim. Versiyon sormamın nedeni Dr.Bob amca header ile ilgili örneği burada http://www.drbob42.com/examines/examinC7.htm yapmış. Bug mı var yoksa ben eksik veya yanlış bir şeyler yapıyorum. Burada da XE ile yapı...

<?xml version="1.0"?> <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encodin...

cnPack componenti

http://www.cnpack.org/index.php?lang=en

buradan ulaşabilirisiniz.

Client Form Unit unit MainClient; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, IWebService1, BaseForm, Vcl.ExtCtrls, Editfrht, Memofrht, Vcl.Imaging.GIFImg, dxGDIPlusClasses, Soap.I...

Sizin için bir örnek hazırladım umarım yardımcı olur. Aslında yapmak istediğiniz çok basit. Delphi 7 de bunlar için resize kodu yazmanız gerekiyor. Tam işkence işlevsel kodlarla ayrı uğraşıyorsunuz form hizalama boyut değişimi ile ayrı uğraşıyorsunuz. Padding Margin ve align özellikleri tamamen işin...

Sanırım Sumo robotu gibi bir şey. Kontrol kısmında USB veya Seri Port haberleşmesi ile yapabilirsiniz. RS232 seri port ile çok basit kolay şekilde kontrol yapılabilir. Tabi bunu yapmak için seri haberleşme bilginizin ve az da olsa Delphi bilginizin olması gerekir. http://sourceforge.net/projects/com...

Web tabanlı uygulama için neredeyse hiç yok diyebileceğim kadar bilgim olduğundan ve aynı zamanda Java tarafında çok fazla kaynak ve örnek uygulama olduğundan böyle dedim. Tabi ki aynı zamanda Microsoft tarafına lisans parası ödemekten ve daha da önemlisi virüs illetinden bir nebzede olsa uzak durmu...

Her Input penceren ve Output penceren ayrı olursa formların kodları daha sade ve anlaşılır olur. Düzenleme yaparkende ilerde birşey eklemek değiştirmek istediğinizde de çok kolaylık sağlar. Kullanım anında Create ve Free etmenizde performans açısından sadece kullanacağız zaman bellek kullanımı olaca...

Arkadaşlar masaüstü olarak çalışan Delphi 7 ile yazılmış CRM - ERP hepsinden bir şeyler bulunan programımız var. Veri tabanı olarak postgresql kullanılıyor. Bu uygulamayı web servis şeklinde dönüştürmek istiyoruz. Client tarafını her şekilde Delphi ile yapacağız. Fakat Server tarafını nasıl yapmamız...

Application.CreateForm(TFormYardimciPencere, FormYardimciPencere); dpr dosyası içinden bu satır silerek otomatik create edilmesini iptal edeceksin. Proje açılırken form otomatik olarak yaratılmayacak. TFormYardimciPencere.Create(Application).Show; kullanacağın zaman Create edersen sorun olmaz. sena...

FlexCell bileşenini Delphi7 ile bir sürü projede formda çokça kullandım. Delphi sürümünü yükseltmek istiyorum fakat Excel bileşeni ile ilgili hatalar veriyor. Bileşenin kodlarının içinde PChar gördüğüm bilgileri PAnsiChar yapınca sayısal bilgileri alıyorum fakat yazı karakterlerini alamıyorum. Çince...

procedure TForm3.FormShow(Sender: TObject); begin MainMenuUyarla(Sender); MeasureMenuitem(Sender); //üstteki satırların yerine bunları kullanırsan olacaktır. MainMenuUyarla(MainMenuUyarla); MeasureMenuitem(MeasureMenuitem); end; ikra hocanın dediği gibi formshow anında şu şekilde yazarsan sorunsuz ...

Servis tablosunda mamullerin şu anki durumda 4 adetle sınırlı. Eğer servis kısmında mamullerin sınırsız olmasını istiyorsan bir tablo daha eklemelisin. SERVIS_DETAYI tablosu alanları aşağıdaki gibi yapabilirsin. mamul_id veya mamul_kodu miktar ariza_sebebi servis_id sonuc yukarıdaki şekilde servis f...

procedure TForm1.EditClickColor(Sender: TObject); begin inherited Click; if (Sender is TEdit) then begin if (Sender as TEdit).Color = clWhite then begin (Sender as TEdit).Color := clBlack; (Sender as TEdit).Font.Color := clWhite; end else if (Sender as TEdit).Color = clBlack then begin (Sender as T...