DELPHI – 7
MP3 Player Kaynak Kodları
{Açıklama: Media Player kullanmadan MP3 Player… Programın zipli kaynak kodlarını buradan alabilirsiniz. http://yadisk.cc/d/3MzncHryscV}unit Unit1;interfaceusesWindows, Messages, SysUtils, Classe...
Değişkenler
İşlemlerimizi yaptığımız, sayıları (integer), metinleri (string), istediğimiz herşeyi, tanımlayarak muhafaza eden, programların vazgeçilmez öğeleridir. Bir değişkenin programda kullanılmadan önce tanı...
Kontrol Paneldeki Ayarları Programdan Açmak
{ Exampels of AppletFileNames: ——————————————— Timedate.cpl : Time and date Joy.cpl : Game controlers Telephon...
Delphi ile IP Bulma
unit Unit1; interface uses Windows, Messages, SysUtils, Winsock, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Label1: TLabel; Label2: TLabel; pro...
Memo’da Cursorun Yerini Bulma
procedure TForm1.Button1Click(Sender: TObject); var Row, Col: Integer; begin Row := SendMessage(Memo1.Handle, EM_LINEFROMCHAR, Memo1.SelStart, 0); Col := Memo1.SelStart – SendMessage(Memo1.Handl...
Web Adresini Açmak
Bir web adresini açma uses kısmına Shellapi unitini ekleyin; ShellExecute(Handle, ‘open’, ‘http://emreoz.cjb.net’, nil, nil, sw_ShowMaximized);
Çift Tıkla Maximize
Form üstüne dbclick yapılınca maximisize (tam ekran) olması type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private procedure WMNCHitTest(var M: TWMNCHitTest); me...