-
Üyelik
26.05.2017
-
Yaş/Cinsiyet
38 / E
-
Meslek
Yazılımcı
-
Konum
Ankara
-
Ad Soyad
M** A**
-
Mesajlar
1
-
Beğeniler
0 / 0
-
Ticaret
0, (%0)
Delphi ile tek satır kodda toplayalım. Giriş, gelişme, sonuç
for i:=strtoinT(edit1.text) to strtoint(edit2.text) do if ISPrime(i) then listbox1.Items.add(inttostr(i));
Yoksa Function :)
function ISPrime(Value:Integer):Boolean;
var
i,j:integer;
begin
i:=0;
for j:=1 to Value do if (Value mod j=0) then i:=i+1;
if i=2 then result:=True;
end;
KartPazar
Üyeliği Durdurulmuş
Banlı Kullanıcı
-
Üyelik
03.05.2013
-
Yaş/Cinsiyet
34 / E
-
Meslek
Ön Ödemeli Kart Satışı
-
Konum
KKTC
-
Ad Soyad
B** U**
-
Mesajlar
1135
-
Beğeniler
160 / 373
-
Ticaret
16, (%100)
2 ay önce açtığım, kimse takmadı diye üzüldüğüm konum ilgi görmüş. Çok mutlu oldum :)
1 kişi bu mesajı beğendi.
-
Üyelik
22.11.2015
-
Yaş/Cinsiyet
25 / E
-
Meslek
Öğrenci
-
Konum
İstanbul Avrupa
-
Ad Soyad
M** Ç**
-
Mesajlar
582
-
Beğeniler
186 / 191
-
Ticaret
12, (%100)
başlık yüzünden girmiyorum :p şaka yaptım bilgim olsa yazardım
www.tarcindigital.com - Profesyonel Web Tasarım, Grafik Tasarım ve Sosyal Medya Pazarlama
-
Üyelik
13.09.2015
-
Yaş/Cinsiyet
31 / E
-
Meslek
E-Sporcu!
-
Konum
İstanbul Avrupa
-
Ad Soyad
A** Ç**
-
Mesajlar
1186
-
Beğeniler
373 / 375
-
Ticaret
26, (%100)
Hocam senin paylaştığın alt alta çok uzun hep hepsini tek bi satıra sığdırdım, kod bilgimiz yok ama böylede olur herlade ? :)
n1=int(input('First number: ')) n2=int(input('Second number: ')) for n in range(n1,n2): i=2 while i
-
Üyelik
19.04.2015
-
Yaş/Cinsiyet
27 / E
-
Meslek
Developer
-
Konum
İstanbul Avrupa
-
Ad Soyad
E** E**
-
Mesajlar
820
-
Beğeniler
1 / 302
-
Ticaret
1, (%100)
Ben de ara ara buraya yazacağım, güzel fikir :) Konsepte uyar mı bilmem ama kısalıktan çok iç içelik beni daha çok çekiyor, C# ile yaptığım bir çalışmada listedeki seçilen içeriği panoya kopyalamam gerekti;
Uzunu böyle,
private void KodlarListesi_SeçimDeğiştiğinde(object sender, SelectionChangedEventArgs e)
{
var BuListe = sender as ListView;
var SeçilenKodlar = BuListe.SelectedItem as Kodlar;
if (SeçilenKodlar != null)
{
Clipboard.SetText(SeçilenKodlar.Kod.ToString());
}
}
Kısası da böyle,
private void KodlarListesi_SeçimDeğiştiğinde(object sender, SelectionChangedEventArgs e)
{
if ((sender as ListView).SelectedItem as Kodlar != null) Clipboard.SetText(((sender as ListView).SelectedItem as Kodlar).Kod.ToString());
}
no time for caution
