-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
30. Nov 2009
Du lenkst immer wieder vom Thema ab. Hier die Metapher dazu:
PP sagt: Die Summe der ersten beiden Primzahlen (in der Reihe der Primzahlen) ergibt die dritte Primzahl.
FW antwortet: Diese Aussage ist falsch, denn es gibt viel mehr als nur drei Primzahlen!
Resümee: Die Aussage "es gibt viel mehr als nur drei Primzahlen" ist zwar richtig, hat aber mit der Behauptung, dass die Aussage von PP...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
30. Nov 2009
Wenn man Programmieren als Wissenschaft bezeichnen möchte, dann ist es sicher eine ANGEWANDTE Wissenschaft, d.h. die Verifizierung einer Hypothese erfolgt über das nachvollziehbare Experiment. Es ist demzufolge sinnlos, eine Hypothese mit einer Gegenhypothese zu konfrontieren, wenn alle nachvollziehbaren Experimente die Ausgangshypothese bestätigen; vor allem dann, wenn es keine Experimente gibt,...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
30. Nov 2009
Verzeihung, ich glaube du verwechselst da etwas: "Treiber" sind für die Datenübertragung auf Hardware-Ebene zuständig. Die Ergebnisse für die Suchanfragen FindFirst und FindNext werden vom Betriebssystem Windows geliefert und nicht von Treibern.
Man muss jedoch dazu sagen, dass Windows aufgrund seines proprietären und nicht offengelegten Quellcodes eine "Blackbox" ist, d.h. wir können nur...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
30. Nov 2009
Du meinst also, wenn das RAD bisher seit zehntausenden von Jahren funktioniert hat, heißt das nicht, dass es in 50.000 Jahren immer noch funktionieren wird und wir deshalb auf Räder verzichten sollten? ;-)
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
30. Nov 2009
Conclusio: Der Denkfehler, den himitsu und Fridolin Walther offensichtlich begangen haben, rührt m.E. daher, dass sie zwei Begriffe miteinander verwechselt haben: UNSORTIERT und ZUFÄLLIG. Das sind Begriffe, die wir durch empirische Erkenntnis in der Alltagserfahrung immer wieder im Zusammenhang erlebt haben und die deshalb in unserem Denken fest aneinander gekettet sind: Wenn etwa der kleine...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
29. Nov 2009
Wenn man eine Behauptung aufstellt, muss man sie beweisen. Das ist die Grundlage der Logik, des Denkens und der Wissenschaft überhaupt. Sonst könnte jeder behaupten, die Erde sei eine Scheibe (oder 1 + 1 = 3), und alle Kinder müssen das dann in der Schule lernen ...
Man sieht, dass du immer wieder vom Thema ablenkst. Das Thema lautet aber: Funktioniert der Code oder funktioniert er nicht?...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
29. Nov 2009
Du hast nur mit anderen Worten umschrieben, was ich bereits gesagt habe. Ob man die erstellte Informationsstruktur als Suche oder oder als Liste bezeichnet, ist in Hinblick auf das Diskussionsthema irrelevant.
Du hast mir das noch immer nicht bewiesen, sondern es nur behauptet.
Die Anordnung der Dateien innerhalb der MFT ist sehr komplex und wird von mehrschichtigen Regeln bestimmt....
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
29. Nov 2009
Richtig. In Beitrag #32 habe ich gezeigt, dass dies so ist: Die unsortierte Reihenfolge ist "statisch". Ob du das dann als "Zufällig", "kariert" oder "rosa-getupft" bezeichnest, hängt von deinem Geschmack ab.
Dann BEWEISE mir doch, dass dieser Fall eintritt. Nach meinen ausgiebigen Tests ist er noch nie eingetreten und kann gar nicht eintreten, da die unsortierte Reihenfolge der Dateien in...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
29. Nov 2009
Nochmals: FindFirst erstellt keine Dateiliste, sondern gibt ein Handle zu einer Suche zurück, die von Windows ausgeführt wird. Und: Die Reihenfolge der Iteration ist nicht deshalb konstant, weil die manifestierte Dateiliste nach einem bestimmten Muster sortiert wäre, sondern weil sie UNSORTIERT ist! Du hast richtig gelesen: "Unsortiert" ist also auch eine definierte Reihenfolge, die sich aus der...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
29. Nov 2009
Habe ich etwa das Gegenteil behauptet? Noch was: Beim Programmieren gibt es keinen "Zufall" - nicht einmal bei Random. D.h. im Computer passiert überhaupt nichts, was mit Zufall zu tun hat. ;-)
Habe ich das etwa behauptet?
Was hat das mit meinem Code zu tun?
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
29. Nov 2009
Hier nochmals mein Begleittext zum Demoprogramm: "Ausgehend von einer geladenen Datei wird die nächste Datei im Verzeichnis der geladenen Datei gesucht."
Wenn dann mit FindFirst die Suche am Beginn des Verzeichnisses fortgesetzt wird, so wird auf diese Weise durch alle Dateien des Verzeichnisses so iteriert, dass beim Erreichen der ursprünglichen Datei jede Datei einmal drangekommen ist. Das...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
29. Nov 2009
Erstens handelt es sich nicht um "FindFile", und zweitens gibt FindNext eine bestimmte gleichbleibende Reihenfolge wieder. Probier das Demoprogramm doch mal aus!
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
28. Nov 2009
Habe jetzt eine ultimative Lösung geschrieben und möchte sie euch nicht vorenthalten:
procedure TForm1.LoadAFile(const AFile: string);
var
ThisFilePath, ThisFileName: string;
begin
Form1.Caption := AFile;
mmoFilesInDirectory.Lines.Add(AFile);
end;
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
War mein Beitrag um 18:04 nicht deutlich genug? :gruebel:
Das wäre dann ja noch aufwändiger als 18:04/Methode 2
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Aber dann wird halt mit FindNext immer wieder die selbe Datei gefunden!
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Habe gerade den Vorschlag von Klaus01 und Daniel G probiert - funktioniert leider nicht:
procedure TForm1.FormCreate(Sender: TObject);
begin
// Verzeichnis, das mehrere JPG-Dateien enthält:
Form1.Caption := 'F:\test\test1.jpg';
end;
procedure TForm1.btnGetNextFileClick(Sender: TObject);
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Meinst du den gleichen Vorschlag wie Klaus01? Das würde jedoch immer das selbe Ergebnis liefern, weil ein neues FindFirst (nach vorherigem FindClose) immer an der gleichen Stelle wie das vorherige FindFirst beginnt.
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Leider nein - diese Funktion wird immer das selbe Ergebnis liefern ...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Genau DAS wollte ich ja vermeiden. Grund des Ganzen: Ich brauche eine Funktion HoleNaechsteDatei, um ausgehend von der aktuell geladenen Datei die "nächste" Datei im Verzeichnis dieser geladenen Datei zu suchen (wobei die aktuell geladene Datei nicht über eine Suche gefunden sondern manuell vom Anwender geladen wurde). Dafür gibt es nun verschiedene Möglichkeiten:
1. Im Verzeichnis der aktuell...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Natürlich hat das was mit dem Universum zu tun. Damit wollte ich ausdrücken, dass wenn es wirklich irgendwo die besagte Liste geben sollte, diese auch auffindbar sein sollte. Dazu gibt es ja ein WinAPI. Wenn aber FindFirst nach deiner Aussage keine solche Liste erstellt, sondern nur "die erste Datei auflistet, die Windows findet", dann dauert die Suche mit FindFirst in einem Verzeichnis mit sehr...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Nein, ich möchte u.a. herausfinden, wie FindFirst und Findnext WIRKLICH funktionieren.
Wenn FindFirst wirklich wie oben behauptet eine "Liste der passenden Dateien" erstellt, dann müsste:
1. FindFirst in einem Verzeichnis mit sehr vielen Dateien (z.B. 100.000) erheblich langsamer sein als in einem Verzeichnis mit z.B. nur 3 Dateien, was nach meiner Erfahrung nicht zutrifft,
2. diese...
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Ja, aber irgendwo muss dann diese "Liste von gefundenen passenden Dateien" sich doch befinden - in einem anderen Universum?
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Eine Liste von passenden Dateien? :gruebel: Ich dachte immer, FindFirst findet einfach nur die erste Datei im betr. Verzeichnis (und FindNext die jeweils nächste) und schreibt deren Eigenschaften in den SearchRecord? Wo soll denn diese Liste von gefundenen passenden Dateien sein?
-
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
21. Nov 2009
Hallo, weiß jemand wie man NACH FindFirst die Suchmaske verändern kann, sodass FindNext dann diese veränderte Suchmaske verwendet?
