|
Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
Delphi 12 Athens
|
Re: Kann jemand bei dieser (eigenen)MaskMatch-Funktion helfe
10. Mai 2005, 09:01
Wenn ich mal fies sein darf 
Delphi-Quellcode:
uses
Masks;
...
var
Mask: TMask;
begin
Mask := TMask.Create('*kk*');
try
if Mask.Matches('khkk') then
ShowMessage('Geht doch :)');
finally
Mask.Free;
end;
end;
...  ...
P.S. Resourcenschutz vergessen 
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
|