Delphi Forum

Mrb;

Tuş sümilasyonu yerine login ekranını getiren uygulama veya apiyi çağırmayı denemelisin gibi geliyor bana.
Peki nasıl olacak bu diyorsan bilmiyorum. Mantığı belki yardımcı olur diye düşündüm.

Kolay gelsin.

KeyDown Event'ına eklenen aşağıdaki kod ile olay çözülmüştür.

Herkese teşekkürler;

Son mesajımda ikra 'ya durumu anlatırken kendi sorumu cevaplamışım aslında farkında değilim :)
Örnekleri incelerken hep SetStrProp komutuna denk gelmişim.
Birde GetStrProp yazayım bakalım ne olacak dedim. Sonuç başarılı.


//Objemizi yakalıyoruz
obj:=FindComponent(Items .Obj ...

Öncelikle ikra ve xxxjedixxx ikinize de ayrı ayrı teşekkürler;

Sevgili xxxjedixxx;

Her nesnenin text özelliği olmayacağını biliyorum zaten.
Ben sadece nesneyi bir şekilde seçip ki bu arrayda belirtilen nesne olsun istiyorum text özelliği varsa kullanmak istiyorum.
Zaten arrayda manuel tanımlama ...

Öncelikle teşekkürler;

Sizin örneğiniz ile konuyu açmadan önce yazmış olduğum kodlar benzerlik gösteriyor.

Comp := FindComponent(Arr );

İle nesneyi tespit ediyoruz ve akabinde

if (Comp is TMemo) then begin
value:=(Comp is TMemo).text;
....
...
end;


if (Comp is TEdit) then begin
value ...

Teşekkürler bakıyorum hemen;

ikra yazdı:Üsengeclik ile programcilik ak ile kara gibi birbirlerine zit.
Üsengecligini yenebilirsen eger isini görecek sey propinfo.

Mrb;

Form girişi için bir sürü edit ve memo bileşenim var.
Kod yazmakta üşengeç biri olduğumdan bunları tek tek kontrol etmek istemedim.
Bunun yerine array record oluşturup kontrol edilecek bileşen adını, tipini, kontrol şartını yazıyorum.
Daha sonrasında da For döngüsüne sokup şartları yerine ...

Teşekkürler;
Lakin geçen sürede key press eventını dikkate alarak kendi editimi kendim yarattım.
Böylesi daha iyi oldu. Yalnız bir noktada takıldım.
DELETE tuşu.
keypresste delete tuşu nedense engellenemiyor.Biraz araştırdım hep klasik Key = #... eşitliğini göstermişler çözüm olarak. Ama işe ...

MaskEditte #,###.#0 gibi hane tanımlaması yapmak lazım. Milyon hane tanımlayıp bin hane girişi yapılırsa mask tamamlanmamış olur. Yanılıyor muyum?

SimaWB yazdı:TMaskEdit

Veri tabanına kayıt yapmayacağım. Dolar,Euro,Tl dönüşümü için çalışıyorum. Ama biraz daha kompleks şekilde. Şöyleki paraları temsil eden 3 edit var. Hangi editte işlem yaparsan yap değer girildiği gibi diğer ikisinde karşılığı hesaplanıyor. Dahada fazlası var aslında ama bu kadarı çalışsa kafi. Bunu ...

Mrb;

2 haneli kuruş kısmıda dahil ,sağa yaslamalı adam gibi çalışan para girişi yapabileceğim bir companente ihtiyacım var. Daha önce muhasebe programı yazmış olanlar bilir. Var mıdır?

Şimdiden teşekkürler;