72 uygun sonuç bulundu

gönderen RamazanG
07 Eyl 2010 06:21
Forum: Makale ve İpucu
Başlık: Standard Windows Dialoglarını Değiştirmek
Cevaplar: 0
Görüntüleme: 1176

Standard Windows Dialoglarını Değiştirmek

Bazen Open/Save dialog pencerelerinde bağzı metinleri değiştirmek isteriz.
Malesef Delphi windows dialoglarını değiştirmek için bize imkan sunmaz.
ama Windows API kullanarak birşeyler yapabiliriz.
Bu uygulama Open dialog taki metinleri değiştirir.

uses
CommDlg;

{...}

procedure TForm1 ...
gönderen RamazanG
07 Eyl 2010 04:26
Forum: Makale ve İpucu
Başlık: ColorToHtml / HtmlToColor Dönüştürmek
Cevaplar: 0
Görüntüleme: 1072

ColorToHtml / HtmlToColor Dönüştürmek

HTML içinde renkler, sanki bir metinmiş gibi RGB (Kırmızı yeşil mavi) biçimindedir. Rengin her parçası iki rakamlık bir Hex değeridir.
Bu uygulamayla TColor değerini HTML değerine dönüştürebilir, ya da tam tersini yapabilirsiniz.

uses SysUtils, Graphics ...
gönderen RamazanG
06 Eyl 2010 01:58
Forum: Programlama
Başlık: Client-Server - Soru
Cevaplar: 9
Görüntüleme: 2233

Re: Client-Server - Soru

mantığı anladıysan gerisi çocuk oyuncağı, port ve host vermeyi unutmayın!!!



unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls, ScktComp;

type
TForm1 = class(TForm)
Clientsocket1: TClientSocket;
StatusBar1 ...
gönderen RamazanG
06 Eyl 2010 01:41
Forum: Programlama
Başlık: Dosya Uploadına Progressbar
Cevaplar: 5
Görüntüleme: 2104

Re: Dosya Uploadına Progressbar

ProgressBar ile FTP ye dosya upload

Function MyGetFileSize(const sFileName: String) : Int64;
var
oStream : TFileStream;
begin
Result := 0;

oStream := TFileStream.Create(sFileName,fmOpenRead );
result := oStream.Size;
oStream.Free;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin ...
gönderen RamazanG
05 Eyl 2010 06:10
Forum: Programlama
Başlık: Windows 7 kullanıcı yönetici mi?
Cevaplar: 2
Görüntüleme: 1218

Re: Windows 7 kullanıcı yönetici mi?

Kullanıcı Adminmi bu uygulamayla anlayabilirsin, ama istediğin win7 de registry e ulaşmaksa uygulamanda UAC kullanmalısın.

function IsAdmin: Boolean;
var
hAccessToken: THandle;
ptgGroups: PTokenGroups;
dwInfoBufferSize: DWORD;
psidAdministrators: PSID;
x: Integer;
bSuccess: BOOL ...
gönderen RamazanG
05 Eyl 2010 05:28
Forum: Programlama
Başlık: delphi ile windows uygulamalarını minimize etmek
Cevaplar: 5
Görüntüleme: 2108

Re: delphi ile windows uygulamalarını minimize etmek

Bu uygulama edit1'e adı girilen uygulamayı taskbar'a küçültür


procedure TForm1.Button1Click(Sender: TObject);
var
Indicador:Hwnd;
begin
{Sınıf adıyla pencereyi bul}
Indicador := FindWindowByTitle(Edit1.Text);
{Eğer bulunmuşsa}
if (Indicador <> 0) then
begin
// Minimize
ShowWindow ...
gönderen RamazanG
05 Eyl 2010 05:18
Forum: Delphi VCL
Başlık: String ARama
Cevaplar: 5
Görüntüleme: 3379

Re: String ARama

Tanımlama: function AnsiCompareStr(const S1, S2: string): Integer;

Birinci parametreyle girilecek olan metni, ikinci parametrede aramak için
kullanılan bir fonksiyondur. Şayet ilk parametre ikinci parametrenin içerisinde
bulunuyorsa sonuç pozitif, bulunmuyorsa negatif, iki metin aynı ise sıfır ...
gönderen RamazanG
04 Ağu 2010 07:09
Forum: Makale ve İpucu
Başlık: Resimi Döndürmek Kod
Cevaplar: 0
Görüntüleme: 1022

Resimi Döndürmek Kod

{ Nette buldum açıklamasını Türkçe'ye çevirip yayınlıyorum:= Bu uygulama 90 derecedeki bir bitmap'ı 45 derece sağa doğru döndürür}

Uses Math;
// Resmi FromP noktasından ToP Noktasına döndürmek

function TForm1.Vektor(FromP, Top: TPoint): TPoint;
begin
Result.x := Top.x - FromP.x;
Result.y := Top ...
gönderen RamazanG
04 Ağu 2010 07:06
Forum: Makale ve İpucu
Başlık: BalloonHint Kullanımı
Cevaplar: 4
Görüntüleme: 2677

Re: BalloonHint Kullanımı

Tamam ;)
gönderen RamazanG
03 Ağu 2010 03:57
Forum: Makale ve İpucu
Başlık: BalloonHint Kullanımı
Cevaplar: 4
Görüntüleme: 2677

Re: BalloonHint Kullanımı

BalloonHint Delphi 2010 standart komponentidir. Ama aynı örneği kodla da delphinin önceki sürümlerinde de yapabilirsin, Normal hinte göre şık duruyor.
Eğer delphi nin diğer sürümlerini kullanıyorsanız aşşağıdaki kodu kullanabilirsiniz.

Sistem ikonlarını Kullanarak BalloonHint Kullanımı:

Uses ...
gönderen RamazanG
31 Tem 2010 07:31
Forum: Makale ve İpucu
Başlık: BalloonHint Kullanımı
Cevaplar: 4
Görüntüleme: 2677

BalloonHint Kullanımı


procedure TForm1.Button1MouseEnter(Sender: TObject);
var
Pt: TPoint; {Balloon tip için bir İşarateçi}
begin
BalloonHint1.Title := 'Deneme'; {Başlık}
BalloonHint1.Description := 'Bu Tuşa Bamaaaaaa'; {içerik Metin }
BalloonHint1.Images:=ImageList1;
BalloonHint1.ImageIndex:=0; {0 numaralı resimi ...
gönderen RamazanG
25 Tem 2010 11:01
Forum: Makale ve İpucu
Başlık: Kullanıcı Hesap Kontrolü (User Account Control)
Cevaplar: 0
Görüntüleme: 1863

Kullanıcı Hesap Kontrolü (User Account Control)

Merhaba Arakadaşlar kendim çevirdim inşallah birilerine yardımı olur.

Windows Güvenliği ve Kullanıcı Hesabı Kontrolü.
Windows Vista, uygulamaların dosya sistemini kullanmasına kısıtlamalar getirir. Önceki işletim sisteminde kullanıcıların Doküman klasörleri altında değişiklik yapmaları tartışma ...