PDA

Просмотр полной версии : Парсинг


Zuldrak
29.04.2010, 13:48
Есть текст вида 93445

как убрать первые 3 символа в мемо1 а другие в мемо 2

Символы будут меняться!

TrueBit
29.04.2010, 14:06
Есть текст вида 93445

как убрать первые 3 символа в мемо1 а другие в мемо 2

Символы будут меняться!
функция copy
гугли

Zuldrak
29.04.2010, 14:25
Я б погуглил с радостью да времени нету, срочно нужно

TrueBit
29.04.2010, 14:26
Я б погуглил с радостью да времени нету, срочно нужно
var
s: string;
begin
s:='93445';
memo1.lines.add(copy(s,1,3));
memo2.lines.add(copy(s,4,2));
ps первая ссылка в гугле тыц (http://www.delphibasics.ru/Copy.php) , разбираться 5 минут, за то время пока я отвечал уже 3 раза разобрался бы...
Так бы сразу написал сделайте все за меня, мне лень

Zuldrak
29.04.2010, 14:38
Выдает ошибку на Copy

TrueBit
29.04.2010, 14:38
Выдает ошибку на Copy
какая ошибка?

Zuldrak
29.04.2010, 14:41
[BCC32 Error] Unit7.cpp(22): E2268 Call to undefined function 'Copy'

TrueBit
29.04.2010, 14:42
[BCC32 Error] Unit7.cpp(22): E2268 Call to undefined function 'Copy'
а нельзя было сразу указать на каком языке нужно?

Zuldrak
29.04.2010, 14:43
Можно C++ Builder

Zuldrak
29.04.2010, 16:16
Вот режу с одной стороны а как с другой??


AnsiString str = "Строка";

str = str.SubString(1, 3-str.Length());
Memo1->Text=str;

BrainDeaD
30.04.2010, 15:25
AnsiString str = "Строка";
AnsiString str1 = "";
AnsiString str2 = "";

str1 = str.SubString(0, 3);
Memo1->Text=str1;
str2= str.SubString(3, str.Length()-3);
Memo2->Text=str2;