Delphi Ödev

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

    ya şimdi hoca ödev verdi ama neye göre yapıcaz bilmiyorum yardımcı olurmusunuz şimdi olay şöyle...

     

    if ve else komutlarını kullanarak bir şifreleme sistemi yapıcaz çok basit bir şey

    ve şifreyi şu şekil yapcaz 5 kere deneme yaptıktan sonra 5.de hatalı olursa program kendini kapatacak aynen bu pin puk olayı gibi

     

    onun dışında 1 ödev daha var

    delphide çizgi çizme ödevi

     

    25 den 444 e kadar olcak  başlangıç 20 olcak

     

    1 tane 5 gen 1 tanede daire

     

    ama bunları nasıl yapcaz bilmiyorum...

     

    hoca dersin ilk günü geldi proje konusu dağttı sadece konu anlatıp geçiyoruz hiç bir bok yapmıyoruz yardımcı olursanız sevinirim.


    Boş İşler Uzmanı..
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    HeadBanger
    HeadBanger's avatar
    Kayıt Tarihi: 13/Eylül/2007
    Erkek

    böyle eğitim sisteminin içine ediyim işte ne diyim.. hiç bir bok anlamıyorum delphiden


    Boş İşler Uzmanı..
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ~$
    ComputerWolf
    ComputerWolf's avatar
    Üstün Hizmet Madalyası
    Kayıt Tarihi: 26/Mart/2003
    Erkek

    Grafik cizmek icin kullanacagin onceden tanimlanmis birkac komut var.

    Detectgraph, initgraph, setcolor, getmaxcolor ...vb grafik komutlari.

     

    Circle(x,y, yaricap) ;

    gibi dogrudan koordinatlari ve yaricapi girilen bir daire cizebilirsin.

    Bununla ilgili herhangi bir Delphi veya pascal kaynagindan grafik fonksiyon ve komutlarina bakabilirsin. Ezberimde hic kalmadi, uzun suredir Delphi ile uygulama gelistirmiyorum.

    --

    Sifreleme yontemine gelincede yine yapacagin olay basit. Sifre girme tekrar sayisini tutacagin bir sayac + sifre dogrumu yanlismi bunu kontrol edecegin bir karar blogu. Fikir olmasi acisindan dongu sayin belli oldugu icin while kullanabilirsin. 

    sayac=1;

    while sayac <=6 do

    begin

    sayac=sayac+1;

    Write("Sifreyi giriniz"); readln(pwd);

    if (pwd="tbt") then

    begin

    Write("sifre dogru") 

    break

    end

    else

    write("sifre yanlis"); 

    end

    if (pwd <> 'tbt') then...

     

    fikir olmasi acisindan ozensiz sekilde yazdim, dogrudan koda sahip olmaktansa ugrasacak yap ;)


    Hep denedin. Hep yenildin. Olsun yine dene , yine yenil ama daha iyi yenil !
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    HeadBanger
    HeadBanger's avatar
    Kayıt Tarihi: 13/Eylül/2007
    Erkek

    compu hocam yalnız ben bu komutların ne işe yaradııgnı bilmiyorum desem bana kızmasın dimi (:

    edit: neden bilmiyorum baştada açıkladım bize bir bilgi verilmeden konuları biz araştırıyoruz ve sadece kendi konularımızı biliyoruz o yüzden hoca anlatıp geçiyor sanki biz mühendisiz


    Boş İşler Uzmanı..
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ~$
    ComputerWolf
    ComputerWolf's avatar
    Üstün Hizmet Madalyası
    Kayıt Tarihi: 26/Mart/2003
    Erkek

    O zaman yapacak teksey var hocam, aramayi kullanip siteden pascal ve deplhi kaynaklarini ara. Zaten ilk ogrenecegin sey o bilmiyorum dedigin satirlarin ne ise yaradigini ogrenmek olur :)


    Hep denedin. Hep yenildin. Olsun yine dene , yine yenil ama daha iyi yenil !
  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    HeadBanger
    HeadBanger's avatar
    Kayıt Tarihi: 13/Eylül/2007
    Erkek

    ComputerWolf bunu yazdı:
    -----------------------------

    O zaman yapacak teksey var hocam, aramayi kullanip siteden pascal ve deplhi kaynaklarini ara. Zaten ilk ogrenecegin sey o bilmiyorum dedigin satirlarin ne ise yaradigini ogrenmek olur :)


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

    birkaç görsel eğitim seti indirdim ama geniş detaylı bir şey bulamadım memik amcanın sitede galiba dersler kaldırılmış ulaşamadım tavsiye edebilceğin bir şeyler var mı peki ayrıca kitaptan veya kitap benzeri birşeyden anlayamıyorum (: görsel oldugu zaman daha iyi oluyor uygulayıp anlayabiliyorum

     

    edit: birde bize öğretilen delphide kod kısmına girilmiyor yani sadece programı öğrenmeye çalıştırkıyorlar ama pprojeler sürekli kod kısmına giriyor hep otomasyoncuyum plc ve skada öğrenmek için temel attırıyorlar bu dönem


    Boş İşler Uzmanı..
  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ~$
    ComputerWolf
    ComputerWolf's avatar
    Üstün Hizmet Madalyası
    Kayıt Tarihi: 26/Mart/2003
    Erkek

    http://www.tahribat.com/Folder-Delphi-Pascal-49/

     

    www.tahribat.com/search.asp

     


    Hep denedin. Hep yenildin. Olsun yine dene , yine yenil ama daha iyi yenil !
  8. KısayolKısayol reportŞikayet pmÖzel Mesaj
    HeadBanger
    HeadBanger's avatar
    Kayıt Tarihi: 13/Eylül/2007
    Erkek

    (: bende ordaydım ama elde tutulucak bir şey gelmedi elime bakalım bütün hepsini indirip denicem sağol yinede kebapçı (:


    Boş İşler Uzmanı..
  9. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Lathedarkman
    Lathedarkman's avatar
    Kayıt Tarihi: 05/Mayıs/2007
    Erkek

    hocam pascal bilmiyorsan delphide mantığına yatmaz. pascal öğrenirdim senin yerinde olsam ilk olarak

  10. KısayolKısayol reportŞikayet pmÖzel Mesaj
    HeadBanger
    HeadBanger's avatar
    Kayıt Tarihi: 13/Eylül/2007
    Erkek

    Lathedarkman bunu yazdı:
    -----------------------------

    hocam pascal bilmiyorsan delphide mantığına yatmaz. pascal öğrenirdim senin yerinde olsam ilk olarak


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

    öğretmıyorlar hocam öğrenmeyede sanırım suan vaktim yok (: ulan elektronik otomasyon okuyorum c bile öğretmıyorlar..


    Boş İşler Uzmanı..
  11. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ~$
    ComputerWolf
    ComputerWolf's avatar
    Üstün Hizmet Madalyası
    Kayıt Tarihi: 26/Mart/2003
    Erkek

    Yani hoca istedigin 2 programida kodlayip koysam foruma sorunlarin cozulecekse yapalim :) Ama diger odevde yine ayni yontem :D Sen beni dinle birsuru pdf falan var pascal ve delphi ile ilgili giris seviyesinde okumaya basla :D


    Hep denedin. Hep yenildin. Olsun yine dene , yine yenil ama daha iyi yenil !
Toplam Hit: 6290 Toplam Mesaj: 21