ArÅŸiv Anasayfa Düşünce Dünyası
Sayfalar: 12
Bir Button a iki görev Gönderen: babahayati Tarih: 23 January 2007 15:04:57
biyerde bi işe yaracağını sanmıyorum ama beyin jimnastiği yapma adına açtım konuyu
mesela bir tane button! bir tanede edit ımiz olsun, buttona tıklayınca editi gizlesin, tekrar basınca göstersin

bunu çok basit bir şekilde 2 tane if le yapabiliriz gibi görünüyor ama

if edit1.visible = true then edit1.visible:= false;
if edit1.visible = false then edit1.visible:= true;
Smile Smile takdir edersinizki 2. if de şarta uyduğu için bu mantık yanlış

adminlerden ricam  cevabı hemen vermemeleri...
programcılığa yeni adım ata(cak)n arkadaşlar işte size soru

procedure TForm1.Button1Click(Sender: TObject);
begin
      // sadece click yordamını kullanarak halledin
end;
Ynt: Bir Button a iki görev Gönderen: FetihlerFatihi Tarih: 24 January 2007 13:45:55
 Susmak :böö

sorular içinde kaybolmasın diye buraya taşıdım
Ynt: Bir Button a iki görev Gönderen: babahayati Tarih: 24 January 2007 17:15:12
eyvallah iyi etmişsinde,  kimse cevaplamaya cesaret edemiyo galiba, bilenler acemi zannedilmekten bilemeyenler sormayamı utanıyo ne  Smile
Ynt: Bir Button a iki görev Gönderen: HBV Tarih: 24 January 2007 19:54:30
:
procedure TForm1.Button1Click(Sender: TObject);
begin
 if edit1.visible = true then edit1.visible:= false
else
 if edit1.visible = false then edit1.visible:= true;
end;

Ynt: Bir Button a iki görev Gönderen: kocaturk Tarih: 24 January 2007 22:44:37
onclick te şunu yazın

edit1.visible := not edit1.visible;

iki edit içinde

edit1.visible := not edit2.visible;
edit2.visible := not edit1.visible;

her halukârda tek bir edit visible olur SmileSmile
Ynt: Bir Button a iki görev Gönderen: babahayati Tarih: 25 January 2007 14:39:05
edit1.visible := not edit1.visible;

seni, tebrik etmek benim haddim değil ama gerçekten güzeldi.

kulak göstermenin bir çok yolu vardır ancak bu kdar kısa yoldan gösterilenini de bilmiyodum açık konuşmak gerekirse Smile
aramızda programcılığa bu denli hakim arkadaşlar olması çok güzel..
Ynt: Bir Button a iki görev Gönderen: FetihlerFatihi Tarih: 25 January 2007 18:05:08
daha kestirmesi yok sanırım
yeni bölümümüz hayırlı olsun Cheesy
Ynt: Bir Button a iki görev Gönderen: babahayati Tarih: 26 January 2007 09:08:13
vatana millete delphicilere hayırlı olsun,
sanırım hem sohbet, hem soru bölümlerinin karışımı bir bölüm olacak burası. 
burada pratik kod ve algoritma örnekleri soralım / sunalım. bilmece tarzında yani, nedersiniz arkadaşlar yoksa kimseyi test etmek kimsenin haddine değil tabiki...
Ynt: Bir Button a iki görev Gönderen: FetihlerFatihi Tarih: 26 January 2007 11:14:25
bence hoş bir bölüm olacak. fırsat bulursamm bir soruda ben hazırlarım  Embarrassed
Ynt: Bir Button a iki görev Gönderen: FetihlerFatihi Tarih: 02 February 2007 19:44:28
Karakter sayısı @kocatürk'ün kodundan uzun olsa da, aşağıda da kısa bir örnek var Tongue
:
Edit1.Visible:=Pred(Edit1.Visible)

Ynt: Bir Button a iki görev Gönderen: babahayati Tarih: 02 February 2007 21:01:21
Fatih hocam 1 karekter fazlan var *not / pred* ve parantez aç kapayıda sayarsak toplam 3 karekter ederki senin kod bayağı uzun olmuş Smile Smile teessüf ederiz
şaka bi yana buda güzeldi, ancak benim koddan daha az karekter kullanarak bulacak varsa hodri meydan

e.visible := not e.visible; //  edit1 in name si e yaptım Smile Smile
 
Ynt: Bir Button a iki görev Gönderen: FetihlerFatihi Tarih: 03 February 2007 10:12:07
dett, not ifadesindeki boşluk karakteri görünmüyor diye farkı 3 yapma.  değil :böö
hem ben komut sonuna noktalı virgülde eklemedim. Zira son komutta zorunlu değil Grin
Ynt: Bir Button a iki görev Gönderen: babahayati Tarih: 03 February 2007 10:40:35
valla ne diyim seninle baş edilmez Smile
haklısın boşluklar ve noktalı virgülü hesap etmemişim, kocatürkle berabere kaldınız.
fatih=kocatürk
elseif (yani ancak) babahayati > delphi olduğunuda cümle alem gördü buradan Smile

bu arada bilmeyenlerde öğrensin, son komutta ';' zorunlu değil Smile  kodumu iyicene kısaltıyorum
e.visible:= not e.visible
saygılar
Ynt: Bir Button a iki görev Gönderen: FetihlerFatihi Tarih: 03 February 2007 10:44:18
 Cheesy
Ynt: Bir Button a iki görev Gönderen: FetihlerFatihi Tarih: 12 May 2007 13:12:08
Karakter sayısı @kocatürk'ün kodundan uzun olsa da, aşağıda da kısa bir örnek var Tongue
:
Edit1.Visible:=Pred(Edit1.Visible)
bunu deneyen var mı mantıksal olarak çalışmaması lazım. hangi kafayla yazzdım acaba