ummu

Evet arkadaşlar soracagınız soruları sorabılırsınız delphi 7 hakkında ilk dersimiz :

1 : İF THEN ELSE

Genellikle oyleyse bunu yap degilse bunu yap gibi komut örnek olarak ;

begin
if edit1.text = 'dene' then
showmessage('edit1 de dene yaziyor')
else
showmessage('edit1 de dene yazmiyor!');
end;

Cok iyi komuttur Yani Tum en iyi yazilimlar if then else komutuyla yapilir 2. derste goruşmek uzere

__________________

Noktoryus

Ayrıca :

Deneme Sürümü Kod Bankası - [v1.0] :
Delphi Kod Bank 1.0

Ücretsiz Versiyon Kod Bankası - [v2.2] :
Delphi Türk KodBank 2.2

__________________

ummu

Simdi Geldik Diger Dersimize ;

Bu Dersimiz ise While-Do

Yani Bir sart gerceklestiginde siradaki islemi donguye sokar...Ornek:
-------------------------------------------------------------
var
n : integer ;
Begin
n := 0 ;
while n < 50 do // n 50 dan kucuk oldugunda donguye gir
Begin
edit1.text := inttostr ( n ) ;
n := n + 1 ; // +9 degeri aldiginda donguden cikacak.
end ;
-------------------------------------------------------------
Ders 3 Te Gorusmek uzere Zaman buldukca dersler ekliyorum....

__________________

ummu

Sonraki Dersimize Gectik.....
Dersimizin Konusu : ''Timer''

Timer ile Ne Yapabiliriz :

Ornek Olursa : Bir Kodu Belirli MiliSaniye Cercevesinde tekrarlatabiliriz...

Ornek :
------------------------------
Begin
showmessage('deneme');
end;
-------------------------------
Timer 'in enabled fonksiyonu ile calistirma durdurmayi ayarliyabiliriz ;
------------------------------
Timer1.enabled := true;
------------------------------
Timer ' in intervalini ayarliyarak kac Milisaniyede Calismasini saglayabiliriz;
-----------------------------------------------
Timer1.interval := 1999 ; ///Mutlaka Sayi olmali...

-------------------------------------------------

Bir Sonraki Ders'te Gorusmek Dilegiyle...

__________________

Noktoryus

bişey sorcam, öyle bir kodlama yapac***i program başlat çubuğunda ve ctrl+alt+del kombinasyonunda görünmeyecek ama arka planda çalışacak varmı böle bişey

__________________

ummu

öyle birşey yapılabilir...Kısa sürede derslere devam edecegım sınavlarım dolayısıyla uzun surdu...

__________________