Скачать: CL | DM;

edit   Найти похожие ветки 

← →
men ©   (2004-01-05 14:24) [0]

помогите пожалуйста
как сделать так чтобы можно было чтать все символы edit
тоесть если в edit=а то edit2=g
если edit=T то edit2=r
и ес2и edit=аT то edit2=rg

короче распохновать все символы
если их десять то ...

---

← →
Mike_Goblin ©   (2004-01-05 14:29) [1]

Edit1.Text[1] - первый символ
Length(Edit1.Text) - количество символов

---

← →
men ©   (2004-01-05 14:34) [2]

а если это не edit a memo и там сто символов!?

---

← →
panov ©   (2004-01-05 14:36) [3]

тогда изменяем ответ Mike_Goblin © (05.01.04 14:29) [1]
так:

Memo1.Lines.Text[1] - первый символ
Length(Memo1.Lines.Text) - количество символов

---

← →
men ©   (2004-01-05 14:42) [4]

мне что ли тысячу раз писать
memo1.lines.text[1...1000]?

---

← →
Axis_of_Evil ©   (2004-01-05 14:44) [5]

relax man, use loop :>

for i := 1 to 1000 do
Crypt(memo1.lines.text[i]);

---

← →
men ©   (2004-01-05 14:49) [6]

точно!!! как я сам не догадался!!!
спасибо!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.018 c