Results 1 to 3 of 3

Thread: FileListBox & DriveComboBox.

  1. #1
    5th member of nldelphi
    Join Date
    Mar 2001
    Location
    Alkmaar
    Posts
    2,127

    Question FileListBox & DriveComboBox.

    Zijn we nog een keer.... (het blijft gewoon gezellig hier he...)

    In mijn huidige App. maak ik gebruik van (ja geloof het of niet) de Win3.1 FileListBox en DriveComboBox.
    Nu heb ik over beide een klein vraagje, allereerst:

    (Question 1.)
    Hoe kan ik in de FileListBox een 'UnSelect' uitvoeren.
    Als het formulier waar dit object op staat voor het eerst geopend wordt dan zal je
    zien dat er nog helemaal niets is geselecteerd.
    Na eenmaal iets geselecteerd te hebben, en mijn Formulier te hebben afgesloten,
    zal de volgende keer bij het openen van dit formulier de vorige selectie standaard te
    zien zijn, dit WIL ik niet.
    Momenteel heb ik het opgelost met het 'releasen' van dit formulier als het afgesloten
    wordt, en uiteraard voor het op nieuw openen eerst even 'creeren'.
    Op deze manier gaat het dus wel, maar nu vroeg ik me dus af, is er dan helemaal
    geen 'UnSelect' commando?

    (Question 2.)
    Als ik in mijn DriveComboList in Runtime de 'A:' Drive selecteer, en opdat moment
    bevindt zich er geen Diskette in de Drive, dan krijg ik een vreselijke foutmelding om
    mijn oren geslingerd.
    Hoe kan ik deze foutmelding afvangen, en waar? (waar=event).
    En is het mogelijk om de keuze 'A:' drive niet uit te schakelen.?
    (want het zal NOOIT voorkomen in de praktijk dat deze gebruikt wordt.)
    En zoals je mischien al doorhebt ben ik in de meeste gevallen toch wel heel
    RECHTLIJNIG en SIMPEL, mijn motto, wat je niet nodig hebt ook niet laten zien, dit
    voorkomt veelal problemen kan dus ook niet foutgaan als het er niet is he.
    Dit is dus o.a. ook de reden dat ik niet het standaard 'open' dialog gebruik, voor mij
    zitten daar veel te veel toeters en bellen aan.

    Nou Groetjes van mij en tot vanavond.
    RLD

  2. #2
    Een files in een filelistbox kunnen op verschillende manieren worden uitgezet, eigenlijk werkt het precies hetzelfde als het manipuleren van een selectie van een gewone listbox. Welke manier je het beste kunt gebruiken hangt van de property MultiSelect af. Wanneer MultiSelect false is kan worden volstaan met de volgende regel code:

    // MultiSelect is False;
    FileListBox1.ItemIndex := -1;

    Wanneer de MultiSelect true is moet het volgende stukje code worden gebruikt.

    // MultiSelect is True
    for I := 0 to FileListBox1.Items.Count - 1 do
    FileListBox1.Selected[I] := False;


    Als de die error van de lege A-drive wil opvangen zul de dat moeten doen in het OnException event van het TApplication component wat makkelijker is, is de A drive er uitgooien. Dit kan met het onderstaande stukje code wat moet worden uitgevoerd in de constructor van het formulier of het OnCreate event.


    for I := 0 to DriveComboBox1.Items.Count - 1 do
    if Pos('A:',UpperCase(DriveComboBox1.Items[I])) <> 0 then
    begin
    DriveComboBox1.Items.Delete(I);
    break;
    end;

  3. #3
    5th member of nldelphi
    Join Date
    Mar 2001
    Location
    Alkmaar
    Posts
    2,127

    Talking Bedankt

    Hoi Iedereen, Marcel vroone bedankt voor de fast reply.
    Het werkt als een trein, beide oplossingen.
    Nu kunnen we weer lekker verder.

    Even als toevoeging: bij de volgende code
    Code:
    for I := 0 to DriveComboBox1.Items.Count - 1 do 
    if Pos('A:',UpperCase(DriveComboBox1.Items[I])) <> 0 then 
    begin 
    DriveComboBox1.Items.Delete(I); 
    break; 
    end
    Hoort ook nog even een ( var I: Integer; ) voor mij maakt het niet uit, maar voor
    iemand anders die deze thread ook eventueel wil gebruiken.

    Bedankt en de Groetjes.
    RLD

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Replies: 12
    Last Post: 13-Feb-10, 14:04
  2. Replies: 2
    Last Post: 28-Nov-03, 21:16
  3. DrivecomboBox
    By naruto in forum Algemeen
    Replies: 1
    Last Post: 29-Oct-03, 22:33
  4. FileListBox + ProgressBar
    By Tischnoetentoet in forum Algemeen
    Replies: 5
    Last Post: 27-Feb-03, 16:31
  5. FileListBox + zoeken
    By Tischnoetentoet in forum Algemeen
    Replies: 2
    Last Post: 23-Feb-03, 21:21

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •