lstrpos ?

[Pseudemys Nelsoni]

moin,

gibt es irgendeine API funktion mit der ich ein vorkommen eines chars/strings in einem string prüfen kann? eben wie Pos()?

[mirage228]

Hi,

kopiere doch die Pos (AnsiStrPos, StrPos) Funktion aus der SysUtils in dein Programm. Mindestens eine davon ist in reinem Assembler ohne aufruf von anderen Funktionen geschrieben, sodass du diese einfach kopieren kannst.

mfG
miraege228

[Chewie]

In der Shlwapi.dll gibt es einige C-String-Funktionen. Für deinen Zweck also:
strchr() für die Position eines Zeichens
strstr() für die Position eines Substrings

[Pseudemys Nelsoni]

hallo mirage,

ich bräuchte eine function die mit PChars arbeitet, gibts da keine dreikt aus der api, ohne das ich was aus den delphi units kopieren muss?

EDIT: @Chewie, guck ich mir an, danke :)

edit2: hat jede windows version diese dll?

Edit3: ich hab sie ja nichtmal in winxp -_-

[Luckie]

Zitat:

Zitat von Pseudemys Nelsoni

Edit3: ich hab sie ja nichtmal in winxp -_-

Windows2000: x:\%WinDir%\System32

[Pseudemys Nelsoni]

stimmt, wenn ich ins verzeichnis gucke ist sie da, danke.
mit der suche hats vorhin nicht geklappt :gruebel:

und wie hat chewierausgefunden das die dll solche funktionen hat? ich meine, windows hat ja bald 1000e

[Luckie]

Er hat es mal im PSDK gesehen?

[Pseudemys Nelsoni]

wo da? hast du n stichwort?

[CalganX]

Hi,
wie wäre es, wenn du im PSDK nach dem Namen der DLL suchst oder nach dem Funktionsnamen?! :gruebel:

Chris

[Pseudemys Nelsoni]

hab ich, sonst würd ich hier kaum fragen... :roll:

[CalganX]

Hi,
strchr() :arrow: http://search.microsoft.com/search/r...8%29&s=1&swc=4 :arrow: http://msdn.microsoft.com/library/de...ing/strchr.asp :arrow:

Zitat:

Windows 2000, Windows NT 4.0 with Internet Explorer 4.0, Windows 98, Windows 95 with Internet Explorer 4.0

:roll:

Chris

[Robert Marquardt]

Es ist ziemlich sinnlos einfache String-Funktionen aus obskuren Windows-DLLs aufzurufen.
Niemand garantiert das die Funktionen dort exportiert bleiben.
Zusaetzlich ist das auch noch heftig ineffizient.

Was spricht dagegen die Delphi-Funktionen fuer diesen Zweck aufzurufen?
Ansonsten ist die Jedi Code Library der richtige Ort nach weiteren String-Funktionen zu suchen.

[CalganX]

Hi Robert,
grundsätzlich hast du Recht und ich will dir auch nicht widersprechen.
Das Problem bei den Delphi-Funktionen ist, dass sie in der SysUtils stehen. Und so, wie ich das verstanden habe geht es hier um ein nonVCL-Programm. Und da ist die SysUtils-Unit Gift. ;)

Chris

[Pseudemys Nelsoni]

jo stimmt, es ist eine DLL und die möchte ich natürlich kleinhalten ;)

danke nochmal.

[MathiasSimmack]

Zitat:

Zitat von Chakotay1308

Und so, wie ich das verstanden habe geht es hier um ein nonVCL-Programm. Und da ist die SysUtils-Unit Gift. ;)

Wenn ich da mal erinnern und querverweisen darf: Absturz trotz try/finally

[Pseudemys Nelsoni]

ok, sagen wir mal es ist "schlecht" diese dlls zu benutzen, welche Alternativen habe ich denn?
die C/C++ Coder müssen doch auch irgendeine "normale" Pos-function kennen/haben. gibt es denn Keine sonst?

Was ich nämlich vor habe, ist, einen PChar zu parsen. ALso der PChar sieht z.b so aus:

HKEY_LOCAL_MACHINE\\pfad\zum\key\\key\\[value]

jetzt möchte ich alle 3(oder auch 4) teile getrennt durch "\\" in einem extra PChar haben.

wie ich das hinkriege ist mir schleierhaft

[Chewie]

Zitat:

Zitat von Pseudemys Nelsoni

die C/C++ Coder müssen doch auch irgendeine "normale" Pos-function kennen/haben. gibt es denn Keine sonst?

Die haben ihre eigenen, nämlich die strxxx()-Funktionen, die ihnen in string.h verfügbar gemacht werden. Also quasi ihre eigene "Sysutils".

[Pseudemys Nelsoni]

ich hoffe nicht das ich die einbinden muss :pale:

[CalganX]

Hi,
schreibe dir doch deine eigene Funktion dafür. So schwer ist das nicht. ;)

Chris

[Pseudemys Nelsoni]

also ich hab keine idee, hast du ein beispiel parat?
Sollte natürlich schon mit den PChars gehen, ohne das ich es mit string(PChar) und PChar(string) umwandeln muss :angle2:

[CalganX]

Hi,
für Strings (in PChar kannst du das ganze ja umschreiben, funktioniert ja fast genauso [AFAIK zumindest ;)]):

Delphi-Quellcode:

function StrPos(ASubStr: string; AHaystack: string): integer;
var
  i: integer;
  sTemp: string;
begin
  for i:=1 to length(AHaystack) do begin
    sTemp := Copy(AHaystack, i, length(ASubStr));
    if sTemp = ASubStr then begin
      Result := i;
      Exit;
    end;
  end;
  Result := -1;
end;

SourceCode habe ich nicht getestet, sollte aber einwandfrei funktionieren.

Chris

[Pseudemys Nelsoni]

danke, teste ich gleich mal :)