Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Like unter Delphi

    Delphi
    by Schubi, 24. Apr 2007
  uses Masks;
  
  procedure TForm1.Button1Click(Sender: TObject);
  var
  Mask : TMask;
  begin
  Mask := TMask.Create(Edit1.Text);
  If Mask.Matches(Edit2.Text) Then Button1.Caption := 'True'
  else Button1.Caption := 'False';
  Mask.Destroy;
• Forum: Object-Pascal / Delphi-Language

  Re: Like unter Delphi

    Delphi
    by Schubi, 24. Apr 2007
  Da hilft dir folgende Unit:
  
  unit wcomp;
  
  
  interface
  
  // case-sensitive (Gross/Kleinschreibung wird beachtet)
  function CompareWildString(const wild, Name : string) : Boolean;