Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Stringfilter

    Delphi
    by Oreaden, 28. Jun 2009
  @himitsu: mhhh, 'ne ansi funktion... hier mal etwas, was auch chinesische zeichen ordentlich rausfiltert... ;-9
  
  procedure f(var s, p: string);
  var
  x: string;
  c: char;
  i: integer;
  begin
  if (length(s) = 0) or (length(p) = 0) then exit;
  x := s;
• Forum: Sonstige Fragen zu Delphi

  Re: Stringfilter

    Delphi
    by Oreaden, 28. Jun 2009
  hallo medium,
  
  in welchem bereich bist du tätig?
  
  ja, die bezeichnungen sind eindeutig, f() = eine funktion, s = source/string und a ist das array oder parameter... o.k. den parameter hätt ich wohl besser p bezeichnen sollen...
  
  wo liegt das problem? es geht doch hier nur um eine funktion... die braucht man doch nicht durchnummerieren...
  
  btw: geht doch der ganze thread nur um einen...
• Forum: Sonstige Fragen zu Delphi

  Re: Stringfilter

    Delphi
    by Oreaden, 27. Jun 2009
  juten morgen Ernst Winter,
  
  yep, der bezug geht aus dem kontext hervor. wenn die funktion jedoch ohne kontext in der lib abgelegt wird, so wie deine vorschläge dann tut man sich mit der interpretation doch sehr schwer. daher war meine bitte an dich, es auch zu dokumentieren...
  
  hier habe ich bewusst, deinen style genommen um zu zeigen, dass die kürze und prägnanz der funktion nicht nur...
• Forum: Sonstige Fragen zu Delphi

  Re: Stringfilter

    Delphi
    by Oreaden, 27. Jun 2009
  Seit gegrüßed himitsu,
  
  Ihr wießed doch, dass Eurer Code nur bis D2007 gültig ist, da ein Char ab D2009 mehr als 255 Bits umfassen kann...
  
  Schöne Grüße
  Oreaden
• Forum: Sonstige Fragen zu Delphi

  Re: Stringfilter

    Delphi
    by Oreaden, 27. Jun 2009
  Wie wär es damit?function f(s, a: string): boolean;
  var
  c: char;
  begin
  result := false;
  if (length(s) = 0) or (length(a) = 0) then exit;
  for c in s do
  if pos(c, a) > 0 then
  begin
  result := true;