Delphi-PRAXiS - Ergebnis der Suchanfrage

Ergebnis der Suchanfrage

Datum des Suchindex: Heute, 02:47

Parameter dieser Suchanfrage:

Suche in Thema: Fehler mit FindFirst
Suche alle Beiträge, die von "silentAMD" geschrieben wurden

• Suchmethode: "Suche nach allen Begriffen"
• Nach Datum (firstpost) sortiert
• Zeige Treffer als Beiträge

Zeige 1 von insges. 1 Treffern
Suche benötigte 0.006s

Es liegen Ergebnisse in folgenden Bereichen vor:

Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Fehler mit FindFirst
Delphi
by silentAMD, 2. Sep 2006
hi,
bei folgendem code bekomme ich einen fehler angezeigt:

procedure TForm1.loadcontent(name: String);
var sr: TSearchRec; album: TAlbum;
begin
if(FindFirst(ExtractFilePath(ParamStr(0))+'*.*',faDirectory,sr)=0) then
begin
repeat
if(sr.Attr and faDirectory = faDirectory) and not((sr.Name = '.') or (sr.Name = '..')) then

URL zu dieser Suchanfrage:

https://www.delphipraxis.net/dp_search.php?do=usersearch&search_username=silentAMD&search_exact_username=1&search_sortby=dateline&search_resulttype=post&search_matchmode=0&searchthreadid=76326