Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Помогите с передачей по UDP

Автор: gers 22.1.2008, 18:47

Здравствуйте уважаемы коллеги!
вот задался вопросом, есть клиент и сервер UDP самой простой реализации на idudpserver и idudpclient.

Клиентом передаю серверу определенную стоку например "info", сервер отдает мне информацию, например:

Код


логин, пароль, данные1, данные2, и т.д.

Как мне ее парсить по определенных хотябы Label'ам ?

Код


Label1.Caption := $логин;
Label2.Caption := $пароль;
и т.д.

или есть какойто более простой путь чем я щас показал?
Натолкните на путь истинный.

Автор: Exai1e 22.1.2008, 19:43

Copy, Pos проходеш по строке например до определенного символа например логин заключается в %Login^ идеш по строке видиш симвом % и копируеш каждый символ пока не наткнешся на ^ наткнулся, скопировал все до него в переменную и движешся дальше smile

Автор: gers 22.1.2008, 22:11

Exai1e, большое спасибо за помощь!
И вот сам пример оставляю на будущее может кому-то и пригодится!

Когда x1,x2,x3 - строкового типа (string):

Код


var s,x1,x2,x3:string;
begin
s:='a1|a2|a3';
x1:=copy(s,1,pos('|',s)-1);
delete(s,1,pos('|',s));
x2:=copy(s,1,pos('|',s)-1);
delete(s,1,pos('|',s));
x3:=s;
end;