folder Tahribat.com Forumları
linefolder Delphi - Pascal
linefolder Delphi De Bir Foksiyonu Nasıl Art Arda Çalıştırırız???



Delphi De Bir Foksiyonu Nasıl Art Arda Çalıştırırız???

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ferhatmartin
    ferhatmartin's avatar
    Kayıt Tarihi: 14/Eylül/2005
    Erkek

    mesela elimde şöyle bir şey var.

    procedure TForm1.FormCreate(Sender: TObject);
    begin
    WinExec('C:\Program Files\Microsoft Office\OFFICE11\EXCEL',SW_SHOW);
    end;

    end.

    buna ne eklemem gerekir ki excel bir kere değilde mesela 10 kere açar veya durdurulana kadar açar?? 

     

  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Cosmic
    Cosmic's avatar
    Kayıt Tarihi: 14/Haziran/2006
    Erkek
    ferhatmartin bunu yazdı:
    -----------------------------

    mesela elimde şöyle bir şey var.

    procedure TForm1.FormCreate(Sender: TObject);
    begin
    WinExec('C:\Program Files\Microsoft Office\OFFICE11\EXCEL',SW_SHOW);
    end;

    end.

    buna ne eklemem gerekir ki excel bir kere değilde mesela 10 kere açar veya durdurulana kadar açar??

     


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

    timer ekle onun eventine yaz kodu 1 saniyede bir açılır exel bitanede button koy clickinde timerı disable ettir tmm dır

    Bittik biz bittik
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ferhatmartin
    ferhatmartin's avatar
    Kayıt Tarihi: 14/Eylül/2005
    Erkek
    sağolasın hoca. timer ekledim event ına girdim ama sadece orda ontimer var kod yazacak yer yok. Eksik olan nedir?
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    FiLoZoF
    FiLoZoF's avatar
    Kayıt Tarihi: 31/Temmuz/2005
    Erkek

    form a attığın timer a çift tıkla çıkan kod penceresine kodunu yapıştır sn de 1 excel açar yok ben 10 tane açtıracam diyorsan o zaman da for döngüsü kuracan?

    for döngüsü bilmiyorum dersen şöle;

     

    var

    say:integer;

    begin

    for say:=0 to 9 do

    WinExec('C:\Program Files\Microsoft Office\OFFICE11\EXCEL',SW_SHOW);

    end;



    end.

     Burada bir değişken tanımladık (say) diye bu bizim başlangıç değerimiz ve 0 değeri var to 9 dediğimiz kısım 0 dan 9 a yani 10 kere aşşadaki komutu çalıştır

    demiş oluyoruz ayrıca yolda sanırım bi problem var onu bida kontrol et ;) 

     

  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ferhatmartin
    ferhatmartin's avatar
    Kayıt Tarihi: 14/Eylül/2005
    Erkek
    eyvallah hocam tam öğrenmek istediğim şeydi bu 'for'. yapmak istediğim şey buydu, bir uygulamayı art arda açtırmak. Peki bu for döngüsünü biraz daha ayrıntılı anlatabilir misin? sağolasın?
  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    FiLoZoF
    FiLoZoF's avatar
    Kayıt Tarihi: 31/Temmuz/2005
    Erkek

    şimdi for döngüsü başlangıçta bir sayı verirsin mesela 0 dan başla 10 a kada r aynı işlemi yap dersin o sana 11 defa yazdığın kodu çalıştırır

    örn le anlatayım 

    var

    i:integer; (burda eğer çok büyük sayılar kullanıcaksan bunu yaz yok 256 ya kadar yeter dersen "byte" kullan daha iyi olur )

    begin

    for i:=0 (bu 'i' değişkenimize ilk değeri atıyoruz ve for döngüsünde bu değişkene başlama sayısını belirtiyoruz yani "i"ye verilen değernden  başla) to 10 (şimdi 0,1,2,3,4,5,6,7,8,9,10 yani 11 defa sayacak) do (do diyerek kod yazmaya başlıyoruz)

    begin (eğer birden çok komut satırı kullanıcaksan  begin end; blogunu kullanıcaksın)

    komut...;

    komut;

    end;(bu ikinci blok kapatır)

    end;(buda en başta açtımızı kapatır); 

    for un amacı bir kişiden 100 tane isim isteyebilirsin yada 10 tane sayı isteye bilirsin onun için bunu kullanır kodu 1 kez yazıp istediğin kadar kullanıcıya gönderirsin;)

     

  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ferhatmartin
    ferhatmartin's avatar
    Kayıt Tarihi: 14/Eylül/2005
    Erkek
    eyvallah hocam gayet iyi anladım sağolasın.
  8. KısayolKısayol reportŞikayet pmÖzel Mesaj
    SSH
    SSH's avatar
    Kayıt Tarihi: 21/Temmuz/2005
    Erkek
    bir işlemi birden fazla defa yaptırmak için döngü kullanıyoruz for i:=1 to 10 do şeklinde :D tamam

    sırıtma la.
Toplam Hit: 2047 Toplam Mesaj: 8