Hallo, ich bin auf der Suche nach einer WIldcard-Funktion die intern mit Strings arbeitet.

Sie soll bei diesem Aufruf true zurueckgeben:

if szLike('a'#0'b', 'a?b') then
Gruß win32

bei der Delphifundgrube gibt es eine solche Funktion

http://www.delphi-fundgrube.de/

Danke fuer den Link, jedoch habe ich dort nur Like() und MatchPattern() gefunden. Beide scheitern an der binären null (0).

Programmiere es doch selber, sollte kein problem sein..

Da ich von Natur aus Faul bin habe ich gehofft, dass dies schonmal von jemandem gemacht wurde. Aber so wie es aussieht muss ich wohl selber rann.

dann sollte doch google helfen, oder? regexp delphi

Hi,

Ist das vielleicht das, was du suchst?


Stringvergleich mit Wildcards (* und ?)

mfG
mirage228

@grenzgaenger:
Sind RegExp nicht ein bisschen overkill fuer das Problem?

@mirage228:
Leider auch nicht, da hier die binäre null nicht beruecksichtig wird.

eine binäre null wird normal auch nicht berücksichtigt, da sie idR das endekennzeichen des strings ist. da hilft dir nur eins, a) mit shortstrings zu arbeiten und b) dir die funktion selbst zu schreiben. Viel Glück

Zitat von grenzgaenger:

dir die funktion selbst zu schreiben

Oder man kennt sich einfach mit der VCL aus

zusammenfalten · markieren

Delphi-Quellcode:

uses Masks;

[...]
procedure TForm1.Button1Click(Sender: TObject);
var
  M: TMask;
begin
  M := TMask.Create('a?b');
  try
    if M.Matches('a'#0'b') then
      ShowMessage('ok')
    else
      ShowMessage('nope');
  finally
    M.Free;
  end;
end;

......