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

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

Форум программистов > Delphi: Для новичков > Extract and Verify String

Автор: mido 24.8.2008, 21:06

Hello :

Const Head:String='BTR';

Var
S:String ;
Begin
S:='myfirstfile.doc';

end;

So what i want is :

to verify that the S always starts with 'BTR' i mean like

if not (S) starts with ('BTR') then exit else Continue .

S:=BTRmyfirstfile.doc =True
S:=myfirstfile.doc =false

How could i do like this verification .

Thank you

Автор: ama_kid 24.8.2008, 23:37

Цитата(mido @ 24.8.2008, 22:06

)

How could i do like this verification .

You can do it like this for example:

Код

function CheckString(Param:string):boolean;
begin
 Result:=Pos('BTR',Trim(Param))=1;
end;