menutobutton

[FrontPage]

Merhabalar,

benim yapmak istediğim şu. Yaptımda ama bunu bileşen olarak yapmak istedim biraz olmadı
Tam olarak. Ben kodu forma atıyorum. formun create olayına proseduru çalıştır diyorum. O bana bi panel oluşturuyo. Panelin üstüne main menunun itemlerini atıyo. Daha sonra ben panel üstündeki butona tıklıyorum. o zaman bana onunla ilişkili menuitem inin itemlerini açıyo. mouse çekince gitmiyo. bunu main menu için düşünürsem çok fazla menuler olduğu zaman kişi bir forma girdi diyelimki 10 tane submenu altında. yine 10 tane submenu altında bir menu daha var. kişi ordan girip oraya çıkacak. menu de bu zor oluyo ama butonu ben silmezsem formdan o zaman kişi direkmen ordan diğer menuye kolayca zıplayabilir.

mesela
menu de şunlar olsun.

.menu1
..menu11
...menu111
...menu112
....menu1123
...menu113
..menu12
...menu121
...menu122
..menu13
.menu2

kişi burdan menu121 e girdi. butonlar kapanmadı. orda işi bitti yeniden menuyu kullanacak. menu1123 tıkladı. kendi sırasından sonra create edilen varsa siliyo onun altındakileri create ediyo. click olayı varsa click ettiriyo vs.

Ben bunu component olarak yapıcam ama component yazmayı tam olarak bilmiyorum. Bu arada ben menu ile butonun iletişimini isimden aldırtırıyorum. butona şöyle bir isim veriyorum. 'BTN'+activecontrol.name;
aratırkende copy ile btn yi çıkartıyorum. isimden componenti bulduruyorum ve onun itemlerini alıp işlem yaptırıyorum. Bunun daha kolay bi yöntemi yokmu. Ve bunu ben componente nerden çeviricem. Türkçe component yazma dökümanı varmı?

[gkimirti]

olayı biraz daha acabilirmisin

Panelin üstüne main menunun itemlerini atıyo

nasıl oluyor yani?

[FrontPage]

iki tane panelim var. biri ekranda gözükmüyo diğeri ise windowsun start menusu gibi gözüküyo. ilk önce ben menu deki itemleri alıyorum.
örnek ile açıklasdam daha iyi olur.

dosya
.yeni
.kaydet
.yazdırma
..önizleme
..yazdır
düzen

şimdi form crate edildiği zaman bi tane panel oluşturdu. align ini bottom ettirdim. dosya ve düzen i alıyo panelin üstüne atıyo parentini birinci panel olarak veriyo. ikinci paneli oluşturuyo. gizliyo.
dosya tıkladı yeni kaydet yazdırma listelendi. bunların parenti ise panel ikide oluştu. paneli gösterdi.
yazdırmaya tıklayınca da önizleme ve yazdır seçeneği açıldı.
sonra düzen e basınca dosya haric hepsini siliyo (butonları) ve düzenn altında bişey varsa açıyo yoksa onclick olayını yapıyo. olay bu

[MicroChip]

Kısacası anladığım kadarı ile Başlat menüsü yapmak istiyorsun. Bunu component haline getirmeye ne dersin. Fikir senin component de senin olsun dimi

mesela onclick yordamı olarak create ederken şöyle yapabilirsin:
o items atıyorum kisiekle olsun dolayısı ile tıklama olayı kisiekle1click gibi birşey olacak sende create ettiğin oncilik olayına kisiekle1.click; kodunu yapıştırdığın anda işlemin tamamdır.


Kolay gelsin...

[FrontPage]

Merhabalar,

Aslında ben bunun için ekstratan event filan tanımlamayacağım. sadece forma atıp actitve:=true; dediğim zaman o herşeyi halledecek. şahsen şu an bunu yapıyor. Sadece component haline getirmem lazım. forma kodu eklemek yerine component olarak kullanmak daha mantıklı değilmi.
Onclick olayını menuden aldırtıyorum. kişi hiçbir işlem yapmıyor. elinde hali hazırda bir bir main menusu varsa o yapıyo işlemleri.
Yalnız visible olayını filan yapmadım
sorun şimdi bunu component haline çevirmek
Nasıl yapıcam.

Componentte ben şunu yaptğımda kabul etmiyor.

procedure menutubuton.butonolustur;
var Buton : TButton;
begin
Buton := TButton.Create(Self);
with Buton do begin
name='btn'+activecontrol.name;
// parent := Self; işte burada hata veriyor.
// parent := Panelim2; işte hata veriyor.
end;
end;

nasıl create ettirecem ben bunu yaa
takıldığım nokta burası diyebilirim.