![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Разбор строки по Формату [Win2k, WinXP]
ShiFT © (2004-07-29 11:32:00)Добрый день всем! помогите с сабжем
пример строк
"ОШИБКА!!! В таблице TABLENAME ERRORSTRING!"
"ОШИБКА!!! Поле FIELDNAME В таблице TABLENAME ERRORSTRING!"
Как из этих строк вытащить
TABLENAME
FIELDNAME
ERRORSTRING
Kurtevich (2004-07-29 11:47:00) [1]
s1 := "ОШИБКА!!! В таблице TABLENAME ERRORSTRING!";
s2 := stringreplace(s1, "ОШИБКА!!! В таблице ", '', rfIgnoreCase);
s3 := s2;
Delete(s2, Pos(' ', s2), length(s2)); // s2 = TABLENAME
Delete(s3, 1, Pos(' ',s3)); // s3 = ERRORSTRING
хм... должно работать :)
Sun bittern (2004-07-29 11:34:00) [2]Pos