/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
mappeindhold direkte til listbox
Fra : CykelSmeden fra Aalb~


Dato : 01-03-02 19:37

Jeg har vist været væk fra delphi for længe!
hvordan får jeg automatisk alle filer i 'minmappe' ind i en listbox eller
stringarray?

finn

--
--- CykelSmeden.... edb på gadeplan

Hvis intet er anført, taler jeg om RH 7.1
og når jeg spørger, er det bare fordi jeg ved for lidt!



 
 
Thomas Riedel (01-03-2002)
Kommentar
Fra : Thomas Riedel


Dato : 01-03-02 22:07

det gøres vel bare med findfirst / findnext
mvh Thomas Riedek

CykelSmeden fra Aalborg skrev i meddelelsen
<3c7fca55$0$39858$edfadb0f@dspool01.news.tele.dk>...
>Jeg har vist været væk fra delphi for længe!
>hvordan får jeg automatisk alle filer i 'minmappe' ind i en listbox eller
>stringarray?
>
>finn
>
>--
>--- CykelSmeden.... edb på gadeplan
>
>Hvis intet er anført, taler jeg om RH 7.1
> og når jeg spørger, er det bare fordi jeg ved for lidt!
>
>



Yngve Damgaard (02-03-2002)
Kommentar
Fra : Yngve Damgaard


Dato : 02-03-02 00:53

Hej
Du kan da bare bruge TFileListBox.
En anden mulighed at bruge Sendmessage med LB_DIR som message.
Se eks.

procedure TForm1.Button1Click(Sender: TObject);
var
fname:array[0..255] of char;
begin
FillChar(fname, SizeOf(fname),#32);
StrCopy(fName, 'c:\temp\*.*');
SendMessage(ListBox1.Handle, LB_DIR, DDL_DIRECTORY or DDL_ARCHIVE,
LongInt(@fName));
end;

OBS!
Med første message parameter kan du sætte op hvordan du vil have vist
listen, der er
en oversigt i LB_DIR help.




"CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> skrev i en meddelelse
news:3c7fca55$0$39858$edfadb0f@dspool01.news.tele.dk...
> Jeg har vist været væk fra delphi for længe!
> hvordan får jeg automatisk alle filer i 'minmappe' ind i en listbox eller
> stringarray?
>
> finn
>
> --
> --- CykelSmeden.... edb på gadeplan
>
> Hvis intet er anført, taler jeg om RH 7.1
> og når jeg spørger, er det bare fordi jeg ved for lidt!
>
>



CykelSmeden fra Aalb~ (02-03-2002)
Kommentar
Fra : CykelSmeden fra Aalb~


Dato : 02-03-02 17:45

Tak, det var lige det! --
finn

"Yngve Damgaard" <yngve@yyy.dk> skrev i en meddelelse
news:3c80156c$0$10830$edfadb0f@dspool01.news.tele.dk...
> Hej
> Du kan da bare bruge TFileListBox.
> En anden mulighed at bruge Sendmessage med LB_DIR som message.
> Se eks.
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> fname:array[0..255] of char;
> begin
> FillChar(fname, SizeOf(fname),#32);
> StrCopy(fName, 'c:\temp\*.*');
> SendMessage(ListBox1.Handle, LB_DIR, DDL_DIRECTORY or DDL_ARCHIVE,
> LongInt(@fName));
> end;
>
> OBS!
> Med første message parameter kan du sætte op hvordan du vil have vist
> listen, der er
> en oversigt i LB_DIR help.
>
>
>
>
> "CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> skrev i en meddelelse
> news:3c7fca55$0$39858$edfadb0f@dspool01.news.tele.dk...
> > Jeg har vist været væk fra delphi for længe!
> > hvordan får jeg automatisk alle filer i 'minmappe' ind i en listbox
eller
> > stringarray?
> >
> > finn
> >
> > --
> > --- CykelSmeden.... edb på gadeplan
> >
> > Hvis intet er anført, taler jeg om RH 7.1
> > og når jeg spørger, er det bare fordi jeg ved for lidt!
> >
> >
>
>



Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408847
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste