Memo1 продолжение работы.

← →
MadGhost (2003-08-26 07:46) [0]

Уважаемые мастера, плизз ещё на один вопросик помогите ответить.
1. Memo1 например я ввожу текст, нажимаю Enter и можно ли узнать, какой конкретно текст я ввел сейчас, т.е. конкретней, какой то процесс, пишет в Memo1 вот он дописал, мне нужно например этому процессу передать какую то команду, я например хочу также в memo1 набить этот текст, нажать Enter и чтобы это сообщение отправилось ему.

2. я хочу посмотреть число символа, есть команда Chr(x:byte) а вроде нужен антипод этой команде, т.е. чтобы по числу A он мне выдавал 65.

Заранее благодарен.

← →
MBo (2003-08-26 07:48) [1]

2) F1 на Chr и See Also

← →
MadGhost (2003-08-26 07:55) [2]

делал я так, выдает Ord а она че т тоже не работает :((((
ComPort1.ReadStr(s,1024); Edit2.Text := IntToStr(Length(s)); for i:= 1 to Length(s) do begin d:= s[i]; j:= ord(d); //здесь выдает ошибку. Memo1.Lines.Add(IntToStr(j)); end;

← →
MBo (2003-08-26 07:58) [3]

в этой строке ошибки нет

← →
MadGhost (2003-08-26 07:59) [4]

вах, сорри, из за собсвенной глупости,
d: Char а я String делал, извиняюсь, нужным остается лишь первый вопрос.
MBo спасибо что откликнулся.

← →
Camus (2003-08-26 09:51) [5]

> я например хочу также в memo1 набить этот текст, нажать Enter
> и чтобы это сообщение отправилось ему.

Отлов Enter - OnKeyPress: Key = Char(VK_RETURN).
Весь текст - Memo.Lines.Text
Его отправка - WM_SETTEXT или WM_COPYDATA.

Memo1 продолжение работы. Найти похожие ветки