|
|
 | 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!
> >
> >
>
>
| |
|
|