Массивы

[Fokuss]

В общем мне нужно реализовать отбор
Т.е. у меня есть текст текст1;текст2
и мне нужно чтоб программа после обнаружения ";"
левую часть т.е. текст1 заносила в переменную а
правую часть т.е. текст2 заносила в переменную b
как реализовать не знаю помогите пожалуйста заранее спасибо

[Mad_Cat]

//s-это твой текст
a:=copy(s,1,pos(';',s)-1);
b:=copy(s,pos(';',s)+1,255);

[Fokuss]

а s это переменная?

[Bright-rider]

Да, s - это переменная, в которой будет твой текст.

[Fokuss]

ясно спасибо вам