Форум: "Основная";
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];
Вниззамена символов в Edit Найти похожие ветки
← →
Song (2002-04-13 20:16) [2]
S:="";
For t:=1 to Length(Edit1.Text) Do IF Pos(Edit1.Text[t]," .,")=0 then S:=S+Edit1.Text[t]+"*";
Edit2.Text:=S;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.007 c