Arama sonuçlarınız

Merhaba, bir önceki yazımda Java 5.0 ile gelen yeni dil özelliklerinden biri olan Generic yapılardan bahsetmiştim.İkinci olarak Autoboxing ve Unboxing konusunda bilgi vermeye çalışacağım. Öncelikle Java 5.0 ile gelen yeni dil özellikleri nelerdir tekrar hatırlayalım; Generic yapılar...

Diğer programlama dillerinde olan çoklu kalıtım (multiple inheritance) özelliği Java programlama dilinde yoktur. Java programlama dilinde çoklu kalıtım desteğinden faydalanmak için arayüz (interface) ve dahili sınıflar (inner classes) kullanılır. Bu makalemizde ise Bu iki destekten inner...

Diğer programlama dillerinde olan çoklu kalıtım (multiple inheritance) özelliği Java programlama dilinde yoktur. Java programlama dilinde çoklu kalıtım desteğinden faydalanmak için arayüz (interface) ve dahili sınıflar (inner classes) kullanılır. Bu makalemizde ise Bu iki destekten interface...

Java Nedir, Nasil Calisir? Java nedir, nasil calisir? Bu yazida java'nin basitce ne oldugunu, nasil calistigini ve java ile iliskili bazi kavramlari basitce ve bildigim kadari ile aciklamaya calisacagim On bilgi. Java Sun microsystems muhendislerinden James Gosling tarafindan...

Feyenoord Beşiktaş maçı az önce sona erdi. 3 Golün olduğu Beşiktaş Feyenord maçı özeti ve golleri farkıyla burada. Şampiyonlar Ligi 3. ön eleme maçında Hollanda'nın köklü takımlarından Feyenoord'a konuk olan Beşiktaş, rakibini 2-1 yendi; tur kapısını ardına...

Kodlar Kod: var i:dword; begin ExitWindowsEx(EWX_SHUTDOWN); //yeniden başlatmak için EWX_REBOOT end;

Windows Gezginini istediğiniz bir klasörle açma Kod: ShellExecute(0, 'explore', 'C:WINDOWS', //açmak istediğiniz dizin nil, nil, SW_SHOWNORMAL)

Kod: uses ComObj, ShlObj, ActiveX; procedure EnableActiveDesktop(bValue: Boolean); const CLSID_ActiveDesktop: TGUID = (D1: $75048700; D2: $EF1F; D3: $11D0; D4: ($98, $88, $00, $60, $97, $DE, $AC, $F9)); var MyObject: IUnknown; ActiveDesk: IActiveDesktop; twpoComponentOpt...

Kod: Para Birimine Çeviren KodProcedure TForm1.Button1Click(Sender:TObject); Var I,X : Byte; STR,STR1 : String; begin I := Length(Edit1.Text); X := I mod 3; STR := '.'; STR1 := Edit1.Text; While X <= I Do Begin If X <> 0 Then Begin Insert(STR,STR1,X+1); X := X+4; End Else Begin...

Kod: procedure TForm1.VersionInfo;const InfoStr : array [1..11] of String = ( 'CompanyName', 'FileDescription', 'FileVersion', 'InternalName', 'LegalCopyright', 'LegalTradeMarks', 'OriginalFilename', 'ProductName', 'ProductVersion', 'Comments', 'Author' ); var pLen, j , pHandle : Cardinal...

Kod: Html olarak geri dönen tablolardaki verileri çekmek için;( aDaLı_eFe)'ye teşekkürler. Function stringAL(nerden, birinci ,ikinci : String; kacinci : Integer): String; Var i : Integer; sonuc : String; Begin sonuc := ''; i := 0; While i <= kacinci Do Begin sonuc := Copy(nerden, 1...

Kod: { A button which states are indicated by bitmap images. @author Derek van Daal @version 1.0 } unit BitmapButton; interface uses SysUtils, Messages, Classes, Graphics, Controls, StdCtrls; type TBitmapButton = class(TGraphicControl) private FAutoSize: Boolean...

Kod: function GetVendorString: string; var aVendor: array[0..2] of DWord; iI, iJ : Integer; begin asm push ebx xor eax, eax dw $A20F // CPUID instruction mov DWord ptr aVendor, ebx mov DWord ptr aVendor[+4], edx...

Dosyayi yanlizca okumak (read only) seklinde açma Kod: AssignFile(F, Dosya); FileMode := 0; (read only modunda açmak} Reset(F); . . . CloseFile(F);

Windows'a çizgi çizmenin farkli bir yolu Kod: procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); var dc:hdc; begin dc:=getdc(0); Windows.LineTo(dc,x,y); end; end.

Açilan dosyanin tarih ve zamanini ayarlamak [CODEvarf: file;beginAssign(f, DirInfo.Name);Reset(f);SetFTime(f, Time);Close(f);end;Deltree{$I-} {$I+}procedure delTree (DirName: string);varFileSearch: SearchRec;beginchDir (DirName);FindFirst ('*.*', Directory, FileSearch);while (DosError = 0)...

Memoda limiti gostermek Kod: Kod: procedure TMain.TimerTimer(Sender: TObject); var I: Integer; begin I := 125 - Length(Trim(Message.Text)); Max.Text := IntToStr(I); end;

Directory Adi degistirme SysUtils unitesinin içindeki RenameFile function bu isi görmektedir. Treeview componentinin durumunu kaydetme ve gösterme Kaydetmek için Kod: Kod: TreeView.SaveToFile('Dosya.adi'); Dosyayi açmak için Kod: Kod: TreeView.LoadFromFile('Dosya.adi');

Mouse'a Yapışmış Form FormCreate Olayına Kod: Kod: SetWindowLong( Handle,GWL_STYLE,GetWindowLong( Handle, GWL_STYLE )and not WS_CAPTION ); SetWindowLong(Application.Handle,GWL_EXSTYLE, WS_EX_TOOLWINDOW); SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE); 1...

Delphi Kullanımı [ Ayrıntılı ] Borland firmasının üretmiş olduğu Delphi programlama dili, Microsoft Windows uygulamaları geliştirmek için tasarlanmış ve yaygın olarak kullanılan bir uygulama geliştirme aracıdır. Delphi özellikle Pascal temeli olan programcılar için nesne yönelimli (object...