PDA

View Full Version : سوال: گرفتن موقعیت انتخاب در Edit


loo30fer
جمعه 20 خرداد 1390, 20:56 عصر
با سلام
من میخواستم موقعیت انتخاب رو در ادیت بگیرم مانند عکس نمونه که مقدار موقعیت در عکس اولی 0 و دومی 1 هست حالا چطور میتونم اینکار رو بکنم ؟؟؟؟
البته این شی ادیت هست نه MaskEdit و میخوام این رو خودم با ادیت پیاده کنم چون MaskEdit رو وقتی در حالت RightToLeft قرار میدم عددی رو که وارد میشه رو برعکس وارد میکنه.
tdkhakpur
جمعه 20 خرداد 1390, 21:21 عصر
اکر هدفتان موقعیت کرسر هست میشه این


procedure TForm1.Button1Click(Sender: TObject);
var
pos:integer;
begin
SendMessage(Edit1.Handle, EM_GETSEL, integer(@pos), 0) ;
ShowMessage(IntToStr(pos));
end;
SAASTN
جمعه 20 خرداد 1390, 22:40 عصر
با مشخصه SelStart هم میشه بدستش آورد.
Caption := IntToStr(Edit1.SelStart);