| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Poluchenie simvola v TMemo [D7, XP]
Alral © (2006-08-07 18:58:00)Kak mozno sdelat, chtobi pri vvode kakogo-nibud simvola v TMemo vivodilsja ne etot, a drugoi opredelennii simvol(skazem nazatie na lat. V vivodit russkuju B).
Kolan (2006-08-08 02:35:00) [1]
> Takoi sintaksis korrektnii?
Delphi znaet otvet... Ti poprobui...
Германн (2006-08-08 02:30:00) [2]
> Takoi sintaksis korrektnii?
>
Нет конечно. Никто не знает, что естьMemo1.Length:-(
А вот если вместо Memo1.Length написАть Memo1.Text, то синтаксис будет правильный. Но алгоритм сей - через ж..у :-)
Ты бы лучше сформулировал бы задачу, которую хочешь решить. Всем было бы меньше хлопот. :-)
Alral (2006-08-07 21:47:00) [3]^
||
Takoi sintaksis korrektnii?
Alral (2006-08-07 21:30:00) [4]A sintaksis cherez Memo1.OnChange takoi poidet?
var a: integer;
begin
a:=Length(Memo1.Length);
if Memo1.Text[a]='kakoi-to znak' then .........
end;
Евгений К. (2006-08-07 20:43:00) [5]Можно так же обрабатывать событие Memo OnChange и тогда проверять вместо key, последний элемент строкового массива, но для проверки одного символа лучше использовать keypress.
Leonid Troyanovsky (2006-08-07 19:31:00) [6]
> Alral © (07.08.06 19:07) [4]
> V obshem opredelit simvol, kotorii vvoditsja, i izmenit.
OnKeyPress?
--
Regards, LVT.
Alral (2006-08-07 19:29:00) [7]Hotja... OnKeyPress, Case key of 'X' : key:='x';.....end;end; Vse ravno spasibo za KeyPress
Alral (2006-08-07 19:07:00) [8]V obshem opredelit simvol, kotorii vvoditsja, i izmenit.
Alral (2006-08-07 19:06:00) [9]Tolko esli tam ne odin simvol, pri odnom simvole pojavljaetsja odin, a pri drugom-drugoi, kak togda?
Alral (2006-08-07 19:05:00) [10]Spasibo
clickmaker (2006-08-07 18:59:00) [11]OnKeyDown, key := ...
| |
