Delphi Forum

Arkadaşlar merhaba. Ben delphi de yeniyim. Ben on numara programı yapmak istiyorum. Yalnız bazı şeyleri sormam lazım. Şimdi istediğim 35 tane rakamı seçip 6,7,8,9,10 garanti diye radio butonlar koyup seçtiğim 35 sayının içinden 10 tanesini oynayacak ve bunu 6 garanti dediğimde 6 garanti, 7 garanti ...

Merhabalar. Ben fatih hocanın kitabını aldım. Döngülerde çalışıyordum ama iki ayrı şeyde hata çıktı. Hatanın niye olduğunu anlayamadım. Sorun şu.

procedure button1.onclick
var
isim:string;
hrf:char;
begin
listbox1.items.clear;
isim:= 'feyza pekuysal';
for harf in isim do
listbox1.items.add(harf ...

Ben yeni yeni öğrenmeye çalışıyorum delphi'yi.
Kodlar ve sorunum aşağıda.


procedure TForm1.hesapla(yil:integer);
var
yas:integer;
const
suan:integer=2009;
procedure yasgoster(sonuc:integer);
begin
showmessage(inttostr(sonuc));
end;
begin
yas:=suan-yil;
yasgoster(yas);
end;



Şimdi burada iç içe ...

Arkadaşlar merhaba. Ben delphi & c++ 2009 programını yüklemeye çalışırken daha en başında şöyle bir hata verdi. "Access violation at address 7d48b510." Acaba bu sorunun sebebi nedir. Ben pardus kullanıyorum bu arada. Teşekkürler.

Arkadaşlar merhaba. Ben delphi deki, noktadan sonra gelen komutların ne olduğunu bilmiyorum. Bu komutların teke tek ne olduğunu yazan bir kaynak var mı elinizde acaba? Mesela listbox1.items.strings. Ben bu item'ın ve item'a bağlı bu string'in ne olduğunu ne işe yaradığını bilmiyorum. Ama bana bütün ...

Teşekkürler.

Merhaba ,

procedure TForm1.Button1Click(Sender: TObject);
var
k,ilk,son,deger,toplam:integer;
begin
ilk:=strtoint(edit8.Text);//döngü başlangıç değeri
son:=strtoint(edit9.Text);//döngü bitiş değeri
toplam:=0;
if ilk>son then //başlangıç değeri bitiş değerinden büyükse
begin
deger:=ilk ...

Arkadaşım senin araştırmaktan kastın nedir? Elimde bir kitap var ve o kitap haricinde bir şey yok. Ben de kitapta yazmayan şeyi size soruyorum. Araştırıyorum işte. Bu yaptığım araştırmaya girmiyor mu? Bu delphi'nin nasıl çalıştığıyla ilgili aşağı yukarı bilgim var ama daha acemiyim gene de. Sen ...

Arkadaşlar teşekkürler. Yalnız ben bu kodların ne işe yradığını biliyorum. Ama aşama aşama anlatırsanız sevinirim. Aslında benim kafama takılan inc bölümü toplam o k değeri ne oluyr. toplam ile k toplanıyor toplandıktan sonra inc komutu ile ikinci defa mı artırılıyor. Bu inc in çalışma prensibini ...

procedure TForm1.Button11Click(Sender: TObject);
var
k,ilk,son,deger,toplam:integer;
begin
ilk:=strtoint(edit8.Text);
son:=strtoint(edit9.Text);
toplam:=0;
begin
if ilk>son then
deger:=ilk;
ilk:=son;
son:=deger;
end;
for k:= ilk to son do
begin
inc(toplam,k);
end;
form1.Caption:='sonuç= ' + inttostr ...

Arkadaşlar merak etmeyin delphi'den bahsediyorum. Teşekkürler.

Arkadaşlar merhaba. Ben bir şey sormak istiyorum.

Type
ogrenci:record
adisoyadi:ansistring; adresi:ansistring; medeni_hali:boolean;
var
kimlik:ogrenci;
begin
kimlik.adisoyadi:=inputbox('Öğrenci Adı','Öğrenciler',,);
kimlik.adresi:=inputbox('Öğrenci Adresi','Öğrenciler',,);
kimlik.medeni_hali ...