Edit mouse ile seçimi

[DelphiNV]

Merhaba Arkadaşlar;

Arkadaşlar Mouse'ile bir edit'in içindeki Text'i sürükleyerek seçtip bıraktığımda cursor'un edit'in içindeki Text'in Başına gitmesini nasıl sağlarım.


Birde CxbuttonEdit üzerinde BackSpace Tuşuna batığımda VK_LEFT tuşuna basılı gibi gösterip edit'in sonundan başına doğru cursor'u ilerletiyorum fakat Bu edit'e bir mask atadığımda mesela !99/99/0000;1;_ gibi bu işlem sırasında karakterlerin birer tanesini siliyor..

bunlara nasıl çözüm bulabilirim.

herkese sayılar sevgiler.

[gkimirti]

onmouseup olayında
edit1.SelLength:=0; yazman yeterli

bu seferde shift tusuna basıp ok tusları ile secilebilir
bunun icinde onkeydown olayında shifte basılmıs ise tusu iptal etmelisin

Kod: Tümünü seç

if ssShift in Shift then
    Key:=0;

eger amacın edit icindeki metnin kopyalanmasını engellemek ise bir sekilde
sag tus menusu acılıp kopyalanabilir
bunuda engellemek istersen edititn OnContextPopup olayında
Handled:=True; demen yeterli

[DelphiNV]

Merhaba
Cevabın için teşekkür ederim işimi gördü.

[MaviEjder]

hımm