Sanal Teknoloji.Net ‘ e Hoşgeldiniz.

Delphi Nedir ? Delphi bir programlama ortamıdır.Programlama dili olarak pascalın nesne yönelimli(object oriented) uzantısı olan Object pascal dilini kullanmaktadır.Object pascal kolay anlaşılır bir dile, hızlı derleme gücüne ve modüler programlama için gerekli tüm komutlara sahiptir.Object pascal delphinin IDE si ile birlikte daha anlaşılır bir yapıya kavuşturulmuştur.IDE tümleştirilmiş uygulama geliştirme ortamı demektir.Aşağıdaki gördüğünüz görüntü delphinin idesidir. [...]

var    Icon : TIcon;   Bitmap : TBitmap; begin   Icon := TIcon.Create;    Bitmap := TBitmap.Create;   Icon.LoadFromFile('c:\picture.ico');    Bitmap.Width := Icon.Width;    Bitmap.Height := Icon.Height;   Bitmap.Canvas.Draw(0, 0, Icon );    Bitmap.SaveToFile('c:\picture.bmp');   Icon.Free;    Bitmap.Free; end;

1. YOL : Zaman zaman veritabanlarınızdaki veya programınızdaki kayıtları Excel dosyasına aktarmanız gerekebilir. Bu iş için *.csv dosyasını kullanabilirsiniz. Kayıtların arasına noktalı virgül ( ; ) koyarak uzantısı csv olan bir text dosyasına kaydedin. Dosyanın üstüne çift tıkladığınızda Excel’de açılacaktır. Mesela No, Ad, Soyaddan oluşan bir tabloyu Excel’e aktarmak istiyorsunuz. Kayıtlar şöyle olmalıdır. 1;Mustafa;Şimşek 2;Ahmet;Savaş 3;Buiş;bukadar [...]

Form üzerine bir tane listbox, bir tane Button ve bir tane de DdeClientConv bileşeni koyun. DdeClientConv bileşeninin DDEService ve DDETopic özelliklerini “Progman” (tırnaklar yok) olarak değiştirin ve aşağıdaki kodu yazın. procedure TForm1.Button1Click(Sender: TObject); var P: PChar; begin ListBox1.Items.clear; P := DDEClientConv1.RequestData(‘Groups’); ListBox1.Items.SetText(P); StrDispose(P); end;

Bu sisteminizde bulunan Comctl32.dll dosyasının eski olmasından kaynaklanıyor. Eğer bu dosyayı yenilerseniz hata düzelecektir. Bu dosyayı Delphi CD’sinin “Info\Updates” klasörü altında bulabilirsiniz. Ayrıca aşağıdaki linkten Microsoft’un sitesinden de dosyayı çekebilirsiniz. ftp://ftp.microsoft.com/softlib/mslfiles/40comupd.exe

Help menüsünden About kısmına girin. Alt tuşuna basarak aşağıdakileri yazın. Alt+TEAM Alt+DEVELOPERS Alt+QUALITY (Sadece Delphi 3 ve 4′ün Client/Server versiyonlarında) Alt+AND (SAdece Delphi 1′de) Alt+CHUCK Alt+VERSION (Sadece Delphi 2′de) Database Desktop’tada Help menüsünden About kısmına girin ve delphi yazın.

Delphinin Professional ve Client/Server versiyonlarına sahipseniz, uygulamanızın verdiği mesajları Türkçeleştirebilirsiniz. Mesela MessageDlg fonksiyonuyla gösterdiğiniz mesajların başlıklarını ve düğmelerin başlıklarını değiştirebilirsiniz. Sonra “Invalid Date” gibi bir hata mesajı yerine “Geçersiz tarih, lütfen girdiğiniz tarihi kontrol edin!” gibi mesaj verdirebilirsiniz. Bunun için Delphi’nin Source kodunda yer alan consts.pas (…\Delphi\Source\Vcl\) ve  sysconst.pas (…\Delphi\Source\Rtl\Sys) dosyalarını Delphi ile açın ve [...]

3 boyutlu yazı yazmak için piyasada bir sürü bileşen bulabilirsiniz. Ancak bu işi kendinizde hem de tek satır kod yazmadan yapabilirsiniz. Bunun için; 1. Form üzerine bir label koyun ve caption kısmına istediğiniz yazıyı yazın. 2. Sonra bu label üzerine tıklayın ve Edit menüsünden Copy komutunu verin. 3. Sonra form üzerinde bir yere tıklayın Edit [...]

Açılış ekranı için bir form oluşturun. Formun BorderStyle özelliğini bsNone yapın. Project Options kısmından formu Auto-Create değil, Avaible forms yapın. Daha sonra Project->View Source ile proje dosyanıza(.dpr uzantılı) aşağıdaki kodları ekleyin. begin SplashForm := TSplashScreen.Create(Application); //bu 3 satır eklendi. Formu oluştur SplashForm.Show;                           [...]

Merhaba Arkadaşlar.. Bu dersinizde Programımıza crc koruması koyacaz  çoğunuzun o da ne  dediğini duyar gibiyim. crc bir tür şifreleme algoritması peki programımızda ne işi var.   biz programımızda crc korumasını programımızın kimlik numarasını alma ve kontrol etme şeklinde kullanacağız. burada her programın veya dosyanın belli crc numarası vardır ..  6A97568C  gibi…. ama dosyamızın ufacık bir [...]