POS findet was das ich nicht verstehe... ?

[himitsu]

Die StrUtils ist bei mir eh oftmals mit drin, da die noch andere nette Funktionen drin hat.
StartsText, ContainsText, EndsText, MatchText, IndexText (auch gut für ein CASE mit Strings) uvvm.

In Math liegen zwar ein paar IfThen, aber die String-Version versteckt sich in der StrUtils.


PS: Die StrUtils selber vergrößert die EXE selber praktisch garnicht.
- ungenutzte Funktionen werden nicht in die Anwendung gelinkt
- es gibt keinen "initialization"-Abschnitt oder globale Variablen
- bis auf die SysUtils werden keine bösen Units eingebunden

[Popov]

Hm, vielleicht sollte ich mir die Unit mal genauer angucken. Was ich bisher gesehen habe erinnert mich leicht an meinen alten TI-99/4A. Der hatte auch viele tolle String-Funktionen, die ich später beim C64 vermisst habe und nun hier wieder entdecke

[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]

Gib es mal da ein.
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)
• AText und AParamName werden durch den Aufruf nicht verändert const
• Value wird für die Ermittlung nicht benötigt und gibt nur etwas zurück out
• Wird ein Wert zwingend benötigt, so muss nicht Value überprüft werden, sondern einfach nur der 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.

[Furtbichler]

Zitat von Sir Rufo:

Die richtige Implementierung wäre...

Ich wusste nicht, das es richtig ist, wenn eine Funktion zwei Werte liefert: Einen 'Value' und einen Rückgabewert. Zudem wäre eine Erklärung, wie Du sie angibst, ja überflüssig, wenn der Code wirklich selbstdokumentierend wäre
Wie wäre es (beim Ansatz 'self documenting code') mit drei Funktionen?

Delphi-Quellcode:

Function HasParameter (const AText, AParamName : string) : Boolean;
Function GetOptionalParamValue (const AText, AParamName : string) : String;
Function GetMandantoryParamValue (const AText, AParamName : string) : String;

DAS wäre dann selbstdokumentierend. Finde ich.

[himitsu]

Zitat von 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

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.