[Delphi] Jak sprawdzić czy w edicie znajduje się znak

0

Jak sprawdzić czy w edicie znajduje się znak @ ?

0

IF POS('@',edit1.text)>0 then jest

0

function czyjest(s,ss:string):boolean;
begin
if pos(s,ss)>0 then result:=true else result:=false;
end;

może pomoże [cya]

1 użytkowników online, w tym zalogowanych: 0, gości: 1