Einzelnen Beitrag anzeigen

ichbins

Registriert seit: 9. Jul 2005
Ort: Hohenaltheim
1.001 Beiträge
 
Delphi 2005 Personal
 
#2

Re: prüfen ob String ein Ordner-Pfad ist

  Alt 14. Mai 2006, 22:09
Bastel dir einfach selber was:


Delphi-Quellcode:
function isdirname(s:string):boolean;
var
  i:integer;
begin
  result:=false;
  if length(s)<2 then exit;
  if not ((pos(s[1],'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ')>0) and (s[2]=':')) then exit;
  result:=true;
  if length(s)=2 then exit;
  result:=result and (s[3]='\');
  for i:=4 to length(s) do
    result:=result and (pos(s[i],'alle gültigen Zeichen eben'+'\')>0);
end;
Michael Enßlin
Ich, der ich weiß, mir einzubilden, dass ich weiß, nichts zu wissen, weiß, dass ich nichts weiß.
Sokrates
  Mit Zitat antworten Zitat