Технический форум

Технический форум (http://www.tehnari.ru/)
-   Delphi, Kylix and Pascal (http://www.tehnari.ru/f43/)
-   -   Pascal ABC, проверка описания переменных (http://www.tehnari.ru/f43/t97136/)

Юрий96 24.06.2014 12:56

Pascal ABC, проверка описания переменных
 
Мне нужно в текстовом файле (или переменной) проверить правильность описания переменной с помощью регулярных выражений. У меня почему-то не получается. Помогите, пожалуйста, доделать, чтобы работало. То-есть, если в тексте правильно описано, то выдать: корректно. А если нет, то сказать, например, какая переменная записана дважды.
Вот текст:
program regv;
uses
System.Text.RegularExpressions;
var
s: string := 'var i1,i2: integer; st2,i2: string[5];';
begin
{Readln(s);}
foreach s0: string in Regex.Split(s, ' +') do
Writeln(s0);
{foreach m: Match in Regex.Matches(s, 'var') do
Write(m.Value); }
foreach m: Match in Regex.Matches(s, '(?!var)[s;](((\w+)[,\s]*)+(\s*):(\s*)(integer│string))+') do
Write(m.Success);

if FALSE then writeln('1 ,w'); {строка и позиция - при ошибке}
else writeln('Описание корректное'); {ЕСЛИ нет ошибок}
endif;

end.


Часовой пояс GMT +4, время: 21:31.

Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.