View Full Version : گرفتن سطر و ستون از Memo
Mahdi Yar
دوشنبه 10 اردیبهشت 1386, 00:50 صبح
تابعی که موقعیت مکان نما را در memo بدهد .با تشکر
Mahdi Yar
دوشنبه 10 اردیبهشت 1386, 00:53 صبح
مثل status bar notepad
m-khorsandi
دوشنبه 10 اردیبهشت 1386, 08:09 صبح
اول، برای تاپکیت عنوان مناسب انتخاب کن، بعد
از توابع زیر استفاده کن:
function GetColumn(const MemoName: TMemo): integer;
begin
Result := MemoName.SelStart + MemoName.SelLength - MemoName.Perform(EM_LINEINDEX, -1, 0);
end;
function GetRow(const MemoName: TMemo): integer;
begin
Result := LongRec(MemoName.Perform(EM_LINEFROMCHAR, -1, 0)).Lo;
end;
vcldeveloper
سه شنبه 11 اردیبهشت 1386, 08:48 صبح
با اجازه...
از متد CaretPos خود Memo استفاده کنید.
m-khorsandi
سه شنبه 11 اردیبهشت 1386, 10:10 صبح
از متد CaretPos خود Memo استفاده کنید.
دقیقاً؛
Caption := Format('%d: %d', [Memo1.CaretPos.Y, Memo1.CaretPos.X]);
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.