Forum: Sonstige Fragen zu Delphi
Delphi
by qb-tim,
13. Jun 2006
Ich glaube das kommt daher, dass im uralten DOS (noch vor Windows 3.1) für Ordner die extention ".dir" benutzt wurde.
Stimmt das, oder täusche ich mich? :angel2:
Forum: Sonstige Fragen zu Delphi
Delphi
by qb-tim,
13. Jun 2006
Ich habe mein Programm korrigiert:
procedure TForm1.FormActivate(Sender: TObject);
var SR : TSearchrec;
begin
if FindFirst('*.*', faAnyFile, SR) = 0 then
begin
repeat
// handelt es sich um ein Verzeichnis?
Forum: Sonstige Fragen zu Delphi
Delphi
by qb-tim,
13. Jun 2006
Ahh! Wieso habe ich das nicht gemerkt?
"TComboBox.Items" ist der Eintrag, der gerade markiert ist und "TComboBox.Text" ist der Text, der gerade angezeigt wird...
richtig? :-D
Forum: Sonstige Fragen zu Delphi
Delphi
by qb-tim,
13. Jun 2006
Here ist ein Auszug aus einem meiner Programme.
Noch vorab: Es gibt 4 Ebenen: 1. - 3. Ebene NUR Ordner und 4. Ebene NUR ".dat"-Dateien
procedure TForm1.FormActivate(Sender: TObject);
var SR : TSearchrec;
begin
if FindFirst('*.*', faAnyFile, SR) = 0 then
begin