Отправка Текста из ListBox в текстовые поля

[unicode]

В общем есть строка, которая разделяется определенным знаком, например
kuku:kukuku:ku
нужно отправить kuku в первое текстовое поле, kukuku - в второе, и т.д., то есть знак ':' никуда отправлять не нужно, только слова между этими знаками.
Есть какие то мысли?

[5naip]

самое первое что приходт на ум,это представить строку как массив символов и тупо перебрать ее все...
что-то типа:

var
s:string;
i:integer;
begin
s:=kuku:kukuku:ku;
for i:=1 to length(s)-1 do
 begin
   if s[i] = ...
   //Здесь ставить условия
 end;
end;

но это не есть гут
попробуйте поработать с функциями Copy и Pos.

[unicode]

спасибо, буду пробовать.
Есть еще вопрос - как можно текстовую информацию зашифровать в DES?
или еще в другой формат, в общем это не важно нужно просто зашифровать а потом расшифровать. Подскажете?

[Utkin]

Сообщение от unicode

спасибо, буду пробовать.
Есть еще вопрос - как можно текстовую информацию зашифровать в DES?
или еще в другой формат, в общем это не важно нужно просто зашифровать а потом расшифровать. Подскажете?

Где Вы будете использовать шифрование? Я к тому что можно написать несложный шифр самостоятельно (и даже поискать аналогичные решения на данном форуме).

[unicode]

шифрировать буду данные пол полученые из текстовых строк, потом сохранять их в файл.

[Utkin]

Если безопасность данных всего лишь учебный пример для студента, можно для шифрования использовать Xor (пусть гугл направит помыслы твои).