Delphi Forum

NeverFear

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.Caption:= '2...

NeverFear

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

NeverFear

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

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
var I: integer;
begin
  Memo1.Clear;
  for I:= 999 to 9999 do
  begin
     Memo1.Lines.Add(IntToStr(I));
  end;
end;

NeverFear

Kod: Tümünü seç

ShowMessage(Memo1.Lines.Strings[Memo1.Lines.Count-1]);

ş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.

NeverFear

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.

NeverFear

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....

NeverFear

"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;...

NeverFear

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

NeverFear

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

NeverFear

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 Ctrl+...

NeverFear

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 özell...

NeverFear

Kod: Tümünü seç

Kod:= 'ALİ VELİ';
mus0.Locate('cari_kod', kod, []);

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

NeverFear

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ç"} S...

NeverFear

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

NeverFear

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

Delphi Forum

68 uygun sonuç bulundu

Re: Label'de Para Birimi Toplamak

Re: 999 den 9999 a kadar olan sayılar.

Re: 999 den 9999 a kadar olan sayılar.

Re: Memo da en son satıra gitmek

Re: veritabanı işlemleri Datamodül neden hata veriyo

Re: Programlar Hakkında Tavsiyeleriniz

Re: Delphi Kod Editörü'nde Ctrl+J Tuş Bileşeni Kullanımı

Re: Programlar Hakkında Tavsiyeleriniz

Re: Yardım Edermisiniz

Delphi Kod Editörü'nde Ctrl+J Tuş Bileşeni Kullanımı

Birden fazla sütun içeren Memo'dan StringGrid'e Aktarım

Re: "Çok adımlı işlemler...." hatası

Re: OpenDialog Penceresinin Sabitlerinin Değiştirilmesi

Re: OpenDialog Penceresinin Sabitlerinin Değiştirilmesi

Re: OpenDialog Penceresinin Sabitlerinin Değiştirilmesi