POS findet was das ich nicht verstehe... ?

[v2afrank]

Und ich habe gelernt dass man nicht jede Delphi Funktion bei Google eingeben kann. Da ich PosEX auch noch nie benutzt habe, habe ich da mal bei Google nach gesucht.(Allerdings ohne das Schlagwort Delphi). Hat mit Programmierung nicht mehr viel zu tun

[himitsu]

:lol:

Gib es mal da ein. :zwinker:
http://www.delphipraxis.net/dp_reference.php

[sx2008]

Also ganz allgemein sollte man Funktionen gegenüber Prozeduren mit einem Var-Parameter bevorzugen.
Perlsau hat das im Beitrag #4 schon ganz richtig gemacht. (man sollte aber auch den "Nachrichtentext" als weiteren Parameter übergeben)

Insbesondere Funktionen die ausschlieslich von ihren Eingangsparameter(n) abhängen und keine Nebeneffekte haben (sog. pure functions) machen das Testen des Codes zum Kinderspiel.

[Sir Rufo]

Die richtige Implementierung wäre:

Delphi-Quellcode:

function GetParamValue( const AText, AParamName : string; out Value : string ) : Boolean;
begin
  ...
end;

und der Aufruf

Delphi-Quellcode:

var
  Nachricht : string;
  S1, S2 : string;

GetParamValue( Nachricht, 'M1', S1 );

if not GetParamValue( Nachricht, 'M2', S2 ) then
  raise Exception.Create( 'Parameter M2 wird zwingend benötigt!' );

Documentation by Design

• Alle benötigten Informationen werden übergeben (keine magischen Daten von irgendwo)
• Delphi-Quellcode:

  AText

  und
  Delphi-Quellcode:

  AParamName

  werden durch den Aufruf nicht verändert
  Delphi-Quellcode:

  const

• Delphi-Quellcode:

  Value

  wird für die Ermittlung nicht benötigt und gibt nur etwas zurück
  Delphi-Quellcode:

  out

• Wird ein Wert zwingend benötigt, so muss nicht
  Delphi-Quellcode:

  Value

  überprüft werden, sondern einfach nur der
  Delphi-Quellcode:

  Result

  des Aufrufs (kompakter und lesbarer)

[himitsu]

richtig...

Man kann es auch wie bei StrToInt, TryStrToInt und StrToIntDef machen?

Oder ParamStr, was beim Fehlen einen Leerstring liefert.

[Sir Rufo]

Zitat:

Zitat von himitsu (Beitrag 1253789)

richtig...

Man kann es auch wie bei StrToInt, TryStrToInt und StrToIntDef machen?

Oder ParamStr, was beim Fehlen einen Leerstring liefert.

Die Basis ist aber immer

Delphi-Quellcode:

TryStrToInt

Delphi-Quellcode:

function TryFoo( const AInput : TSomething; out AOutput : TDifferent ) : Boolean;
begin
  ...
end;

function Foo( const AInput : TSomething ) : TDifferent;
begin
  if not TryFoo( AInput, Result ) then
    raise EFooException.Create( 'Please try something different' );
end;

function FooDefault( const AInput, ADefault : TSomething ) : TDifferent;
begin
  if not TryFoo( AInput, Result ) then
    Result := ADefault;
end;

[himitsu]

Zitat:

Zitat von v2afrank (Beitrag 1253763)

Und ich habe gelernt dass man nicht jede Delphi Funktion bei Google eingeben kann. Da ich PosEX auch noch nie benutzt habe, habe ich da mal bei Google nach gesucht.(Allerdings ohne das Schlagwort Delphi). Hat mit Programmierung nicht mehr viel zu tun

Es kommt drauf an ... hatte grade mal versuchsweise das SafeSearch wieder aktiviert, aber dann entgehen einem die Artikel von goFeminin und deren coole musikalische Werbung im Hintergrund.

[Garfield]

Zitat:

Zitat von Sir Rufo (Beitrag 1253794)

Die Basis ist aber immer

Delphi-Quellcode:

TryStrToInt

:gruebel: Ich dachte val. Habe das auch genommen, weil es kein StrToUInt gibt.

[himitsu]

Wenn du mehr brauchst, dann StrToInt64. (andersrum ist die 64 einfach nur überladen, da dort automatisch entschieden wird, anhand des Parameters)

[Garfield]

Könnte ich machen. Aber die Werte in den Strings werden in LowPart und HighPart eines TULargeInteger eingetragen.