Delphi Forum

var
Form1: TForm1;
Sayi1, Sayi2, Sayi3: real;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Sayi1:= StrToFloat(Label1.Caption);
Sayi2:= StrToFloat(Label2.Caption);
Sayi3:= Sayi1 + Sayi2;
Label3.Caption:= FormatFloat('#,###.#0', Sayi3);
end;

Not: Label1 ...

işini görmesine sevindim ...
ne mutlu sana

belki işini görür. aşağıdaki kodlamayı dener misin?

şeklindeki kodlama, sana Memo1'in en son satırındaki değeri geri döndürecektir.
sana düşen, bu kodlamayı TMS'nin AdvMemo bileşenine uyarlaman.

DataModule, kullandığın delphi'nin Project\Options menüsünü takiben; açılan pencerede Forms sekmesinde Auto-create forms başlığı altında olmalı. aksi takdirde arkadaşın yazdığı gibi EAccessViolation hatasına düşersin.

1. fibonacci dizisini, program şifrelemede, algoritma üretirken kullanabilirsin ve bunu bir dosyaya yazdırabilirsin. yaptığım incelemede, sayı üretmeye 1'den başlıyor ve 1 önceki sayıyı üzerine ekleyip yeni sayı üretiyor. bu, istenen üretme sayısı kadar devam ediyor. Örn.: ben 15 kez tekrar istedim ...

"Yeni başlayanlara yol gösterici olacağı düşüncesiyle, Delphi kod editöründe Ctrl+J
tuş bileşeninin kullanımı ile ilgili örnekler sunuyorum.
Açıklamalarda kullanılan | işareti yanıp sönen imleci ifade etmektedir." demişim ...

sen ise;
"aslangeri Cum Kas 28, 2008 10:19

s.a.
@neverfear;
bahsettiğin ...

takıl kendi kafana göre ... kendin seçiver bir zahmet herhangi bir programı.

sen önce o sözlük programını nasıl yapacağını öğren ... biz sana yardım ederiz ... merak etme

Yeni başlayanlara yol gösterici olacağı düşüncesiyle, Delphi kod editöründe Ctrl+J
tuş bileşeninin kullanımı ile ilgili örnekler sunuyorum.
Açıklamalarda kullanılan | işareti yanıp sönen imleci ifade etmektedir.

procedure TForm1.Button1Click(Sender: TObject);
begin
|(imleç) yanıp söndüğü yerde ...

Yeni bir proje açıp Form1 üzerine 1 adet Memo, 1 adet StringGrid ve 1 adet Buton
bırakın. Kodlamamızı iki sütunlu bilgi içeren Memo1 bileşeni için yapacağız.

Object Inspector penceresinin Properties sekmesinden;
Memo1 için -> Height=229, Width=110, ScrollBars=ssVertical olarak ayarlayın.
Lines ...

bir de bu şekilde dener misin? bulursa imleç kayda konumlanır, bulamazsa imleç yerinden kımıldamaz.

OpenDialog penceresinin sağ alt köşesindeki "Aç" ve "İptal" tuşlarının başlıklarının değiştirilmesi ile ilgili kodlamaları buldum ve burada paylaşmak istedim (sıra diğerlerine geldi).

procedure TForm1.OpenDialog1Show(Sender: TObject);
begin
{"OPEN" - > "Aç"}
SetDlgItemText (GetParent ...

elbette derledim. hatta diğer consts (örn.dbconsts ... vb.) içerenleri de türkçeleştirip derledim. burada bir sorun yok.
hatta, aşağıdaki linki de inceleyebilirsin.
viewtopic.php?f=2&t=20770&p=118478&hili ... ar#p118478

Consts.pas dosyasını tamamiyle türkçeleştirmiştim zaten ve o dosya içinde istediğim yok. torry net'te ise, yapmak istediğimi gerçekleştirecek bileşen veya kod örneği yok.
Aşağıdaki adreste ise benzer bir kodlama buldum, ancak henüz deneyemedim.
http://forum.doom9.org/archive/index.php/t-36215.html