[Помогите!] трифорс

[KlimVoroshilov]

К примеру есть
привет:какдела:пока
как мне разделить слова?
буду благодарен готовому коду. спс.

[metraz]

по какому критерию делить то надо? по двоеточиям? тогда через pos

[KlimVoroshilov]

Цитата: Сообщение от metraz по какому критерию делить то надо? по двоеточиям? тогда через pos

Да по двоеточиям, как именно через pos, можно код?

[mad_cat]

вариант 1

Цитата: var sL:TstringList; s:string; i:integer; begin s:='привет:какдела:пока'; sl:=TstringList.create(); sl.delimiter:=':'; sl.delimitedText:=s; for i:=0 to sl.count-1 do showmessage(sl[i]); sl.free; end;

вариант 2

Цитата: var s:string; buf:string; begin s:='привет:какдела:пока'; s:=s+':'; while pos(':',s)<>0 do begin buf:=copy(s,1,pos(':',s)-1); delete(s,1,pos(':',s)-) showmessage(buf); end; end;

[KlimVoroshilov]

Цитата: Сообщение от mad_cat вариант 1 вариант 2

спасибо работает