yazacağın kodlarıtry//buraya kodları yazexcept//burayı boş bırakend;o zaman hata vermez Adı İçin Yaşamak

4. Sorun için Delphi 7 kullanmıyorum ama indy bileşenlerini yükle zaten vardır da kullananlar varsa bilirler Software Developer

ben hata tanimlama sordum sen bana ne anlattin:) neyse yinede saoL...

try//kodunexcept on eshowmessage end;Bu şekilde daha aciklayici hata mesajları yarattırabilirsin yada grünmelerini engellersin. Mail bomber yapmak solediin kadar kolay ama mx serververi cozumlemezsen o mail bomber bi işe yaramaz:) mesela hotmaile mail atman icin hotmailin MX serverina baglanman gerekir. ama senin programın bunu cozumlemezse ortalama kullanıcı nerden bilsin mx3. hotmail.com a baglanmasi gerektiini:)for basit... for i:=0 to 10 do begin showmessage(inttostr end;daha da gelistirelimfor i:=0 to 10 step 2 do begin showmessage(inttostr end; memo1. lines. load ; bu işlemi progressbarla yapamazsın. cunku memo1 classi altindaki fonksiondan cagiriosun yuklencek dosyayi, yani asil islemi class yapio, kullaniciyi kandirmak istiosan uyduruk bi progressbar komasi kolay ama gercek bişe koycaksan... aStream: TFileStream;gibi bi stream tanimlayip veriyi blocklar halinde okutup, ekrana yazarken progressbari o olcude arttirman gerekir. Delphi 7 de dandirik socket, mail componentleri yerin indy geldi. eskisine gre daha zor ama daha kalitelinmsmtp kullanmak istiosan delphi klasorunde bi yerlerde bpl dosyasi halinde bulunması gerekiyo install component menusunden kurabilirsin d7 ye de. ilk kurduunda cikmio yani ama war. Nush ile uslanmayanı etmeli tekdir, Tekdir ile uslanmayanın hakkı ktektir!

1. Sorunun cevabı var sayi:string; begin sayi := edit1. Text; if sayi = "1234" then begin showmessage ; end else begin showmessage ; end; end; Software Developer

merhaba arkadaşlar. bi kaç sorum olcek yardımcı olanlardan allah razi olsun... hata tanımlama nasıl oluyoo? var sayi : integer; begin sayi := strtoint(edit1. text); if sayi = "598744" then showmessage ; end; else begin showmessage ; end; end; end. şimdi arkadaşlar burada edit1. text olayına sadece integerlik bilgiler girilio. benim amacım normal text yani harf yazıldığı zaman hata vermemesini sağlamak yani edit1. text"e "deneme" yazısını girince <"deneme" is not a valid integer value> die bi yazı çıkıyor. şimdi benim amacım bu hatayi yonlendirmek. hatirlamiyorum try la başliyan birşeydi ama neydi? ble beceremediğiim bi sürü hata var. yardımcı olabilirseniz sevinirim arkadaşlar... edit1"e her tıkladığında farkli bi yazi çıkacak rneğin button1. click edit1. text:=memo1. text gibi yani ilk tıkladığımda memo1. deki 1satiri edit1e yazcak işte ble bişey her tıkladığımda bi alt satira gecicek? başka bi soru. herhangi bi dndü yapmak. for do dngüsü ile olmadı. mesela begin showmessage ; end; ya arkadaşlar anlamadiiim bi olay var. galiba sacmaliorum ama yinede soriim ya email bomber yapmak o kadar zormu? bi rnek veriim procedure TForm1. Button1Click ; var adet : integer; begin for adet:=1 to strtoint(edit1. text) do begin NMSMTP1. Host := "mail. tahribat.com"; NMSMTP1. UserID := "admin"; NMSMTP1. Connect; NMSMTP1. PostMessage. FromAddress := "knoppix@root.com"; NMSMTP1. PostMessage. ToAddress. Text := "knoppix@hotmail.com"; NMSMTP1. PostMessage. ToCarbonCopy. Text := "theknoppix@hotmail.com"; NMSMTP1. PostMessage. ToBlindCarbonCopy. Text := "theknoppix@hotmail.com"; NMSMTP1. PostMessage. Body. Text := "Bu Bir deneme mesajidir."; NMSMTP1. PostMessage. Attachments. Text := "c:\File. txt"; NMSMTP1. PostMessage. Subject := "Deneme"; NMSMTP1. SendMail; //ShowMessage ; NMSMTP1. Disconnect; end; end; end. ya bumudur?email bomber:) bu kadar basit olamas die düşünüom ben yaaa. şimdi smtp adresleri filan hepsini doğruladim mail yollayabiliorum diim. email bomber mi olcak salak salak? arkadaşlar simdi dieceksinizki ya salakmısın kardeş denesene? walla arkadaşlar cafedeyim deneyemiorum:) evdede net yok şimdilik... bunu biçok arkadaş biliodur. delphi7 bisürü saçma şeyden arındırılmış güyaa. simdi delphi6da nceden nmsmtp filan vardı. simdi nerdeeeeee yaaaaaaaaaaaa? bisürüüürü pop3 bilmem ne zart zurt var. nerden buLcam ben? :) progresse bağlı olarak işlem yapma... rneğinn diyorum ki memo1. lines. load ; bu işlemi yaparken progress e bağlı olarak çalışcak.. yani işlem yaparken progress bittiğinde işlemin bittiği anlaşılacak?

Progress ile ilgili sorun için valla hiç yle denemedim belki uzun yoldur ama işe yarıyor progressbar1. position:=15; sleep(100); progressbar1. position:=30; sleep(100); ShowMessage ; Eywallah. Software Developer

Memo1. Lines. LoadFromFile olacak herhalde Arkadaştryon hata:exception do ShowMessage gibi bir yapı daha doğru herhaldeexceptend; Adı İçin Yaşamak