Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.09.30;
Скачать: CL | DM;

Вниз

Проблема   Найти похожие ветки 

 
Bast   (2007-09-02 22:06) [0]

Немогу понять в чем ошибка... Формат файла такой:test@mail.ru:password[smtp.mail.ru]pop.mail.ru
email:=Tstringlist.Create;
email.LoadFromFile(form1.Edit12.Text);
t:=Pos("@", email.Strings[x]); // Íàõîäèì "@"
v:=Pos(":", email.Strings[x]); // Íàõîäèì ":"
g:=Pos("[", email.Strings[x]); // Íàõîäèì "["
h:=Pos("]", email.Strings[x]); // Íàõîäèì "]"
form1.edit3.Text:= Copy(email.Strings[x], 1, t - 1);
form1.edit10.Text:=Copy(email.Strings[x], 1, v-1);
form1.Edit4.Text:=Copy(email.Strings[x], v+1, g-1);
form1.Edit1.Text:=Copy(email.Strings[x], g+1, h-1);
form1.Edit2.Text:=Copy(email.Strings[x], h+1, 255);


 
Anatoly Podgoretsky ©   (2007-09-02 22:13) [1]

> Bast  (02.09.2007 22:06:00)  [0]

Ну постарайся


 
Bast   (2007-09-02 22:22) [2]

Можете подсказать что не так?


 
Bast   (2007-09-02 22:23) [3]

ой пля
ПЕРЕМЕННАЯ X :)


 
Bast   (2007-09-02 22:32) [4]

Объясните почему переменные g, h = 0?


 
Leonid Troyanovsky ©   (2007-09-02 22:40) [5]


> Bast   (02.09.07 22:32) [4]

> Объясните почему переменные g, h = 0?

Delphi help: Pos Routine:

If Substr is not found, Pos returns zero.

--
Regards, LVT.


 
Bast   (2007-09-02 23:32) [6]

test@mail.ru:password[smtp.mail.ru]pop.mail.ru но дело в том что [ и ] есть


 
Leonid Troyanovsky ©   (2007-09-02 23:48) [7]


> Bast   (02.09.07 23:32) [6]

> test@mail.ru:password[smtp.mail.ru]pop.mail.ru но дело в
> том что [ и ] есть

Здесь - есть, а там, очевидно, нет.

Чудеса, конечно, бывают, но очень редко.

--
Regards, LVT.


 
Reindeer Moss Eater ©   (2007-09-02 23:54) [8]

Лекарство от чудес:

g:=Pos("[", email.Strings[x]);
if g = 0 then
ShowMessage("Ё-маё! А ведь и правда нету скобок"#13#10 + email.Strings[x]);



Страницы: 1 вся ветка

Текущий архив: 2007.09.30;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
2-1188917942
delphiForever
2007-09-04 18:59
2007.09.30
быстрая работа с графикой без DirectX и OpenGL


3-1179995912
MZ
2007-05-24 12:38
2007.09.30
Скрыть записи в DBGrid е


15-1188802178
@!!ex
2007-09-03 10:49
2007.09.30
Преподавание религиозных предметов.


15-1188749345
JaK[Light]
2007-09-02 20:09
2007.09.30
Wanted! Книги....


2-1189072760
Vlad Oshin
2007-09-06 13:59
2007.09.30
Как получить SQL текст с подставленными параметрами?