Newsgroup: it.comp.lang.delphi
Titolo: Lettore Wav

Io sono nuovo del Delphi e non ho ancora una ottica
completamente OO (sapete vengo dal TP e C).
Per Adesso ho scritto solo 3 programmini in Delphi
tanto per fare pratica.
Però ora ho intenzione di buttarmi su qualcosa di + grosso
(almeno per me ......)
Vorrei realizzare un semplice lettore di file wav
con il vostro aiuto (almeno io spero)
Certo potrei rivolgermi di persona a Andrea Magni 
e chiedere solo a lui tutto ciò di cui ho bisogno
(abitiamo nella stessa città e frequentiamo la stessa compagnia,
insomma siamo amici..), ma ho deciso di chiedere a tutti voi esperti
cosicchè io possa valutare più punti di vista.
Il mio problema è fondamentale:
- per leggere i file wav che API uso??
- secondo dovrei fare un interfaccina grafica per permettere
all'utente di scegliere tra le varie directory del suo hd che file
eseguire..
Per ora vi ringrazio e vi chiedo il vostro aiuto..
Ciao a tutti e in particolare ad Andrea M.
Lawrence Oluyede
rhy...@tiscalinet.it
"Per cambiare, 
per diventare un' altra cosa
dobbiamo prima sapere cosa siamo"
Bruce Lee

Ciao a tutti e in particolare ad Andrea M.
Ciao !                            {MSX}

eseguire..
Sicuramente l'utente deve poter ascoltare quel che + desidera....hai diverse
alternative :
Una OpenDialog, i componenti DirectoryListBox, FileListBox e DriveComboBox o
ancora qualche API.
Ciao!
--
- Carlo -
BSSoftware Tips Mailing-List Support







benvenuto nel club!
penso che qui troverai molte info interessanti..
Saluti
AS
"Se è Microsoft non funziona"

 
(Per MSX e Carlo Bertuccini....e anche per gli altri ^___^)
Per ora ho solamente posizionato i componenti
sulla Form1 e li ho messi in relazione tra loro settando
le loro proprietą che mi sono letto nell' help.
I componenti sono 
1 -- DriveComboBox1	(seleziona il drive opportuno del computer)
2 -- DirectoryListBox1	(che naviga tra le cartelle dei drive)
3 -- FileListBox1		(visualizza i file nelle cartelle)
4 -- FilterComboBox1	(č il filtro dei file (*.* e *.wav))
5 -- MainMenu
6 -- MediaPlayer		(e qua arrivano i problemi )
Allora io l'ho programmato in modo che quando l'utente
fa doppio clic su un file nel FileListBox il MediaPlayer
lo esegue... ma non funziona
Grazie Mille

lo esegue... ma non funziona
Prova a postare la parte di codice che dovrebbe fare ciò. Ovvero quella
parte di codice che fa eseguire il file doppiocliccato.
Sarà più facile vedere dove sbagli !
ciao !



TForm1 = class(TForm)
    DirectoryListBox1: TDirectoryListBox;
    DriveComboBox1: TDriveComboBox;
    FilterComboBox1: TFilterComboBox;
    FileListBox1: TFileListBox;
    MainMenu1: TMainMenu;
    File1: TMenuItem;
    N1: TMenuItem;      //è il punto di domanda
    Exit1: TMenuItem;
    About1: TMenuItem;
    MediaPlayer1: TMediaPlayer;
    procedure Exit1Click(Sender: TObject);
    procedure About1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure FileListBox1DblClick(Sender: TObject);
-------------
procedure TForm1.FormCreate(Sender: TObject);
begin
 with MediaPlayer1 do
  begin
   AutoEnable:= True;
   EnabledButtons:= [btPlay, btPause, btStop, btNext, btPrev,
                     btStep, btBack];
   DeviceType:= dtWaveAudio;
   Open;
  end;
end;
--------------
procedure TForm1.FileListBox1DblClick(Sender: TObject);
begin
 try
   MediaPlayer1.Play;
 except end;
end;
Ecco il codice (è solo una prova per vedere se fossi riuscito
a fargli eseguire il file wav)
Ciao {MSX}


Ora ho sistemato alcuni problemini
ma quello + grosso c'è ancora..
Se imposto la proprietà FileName del
MediaPlayer allora lui funziona ma solo con il file che io ho
deciso...
Allora ho provato in mille modi a linkare la FileListBox con il
MediaPlayer ma non riesco a fare interagire il secondo con il primo..
Ho provato anche a mettere un TEdit contenente il nome 
del file che è contenuto nella FileListBox e farlo esguire con:
MediaPlayer1.FileName:= Edit1.Text
MediaPlayer1.Play 
ma non funziona nulla........ ^ççççç^
Come faccio a linkarli??
Grazie mille!! 


 wrote in message
652qkso68utt5n26d...@4ax.com...


Ciao

 wrote in message
6m4vkskjgomqohago...@4ax.com...


Grazie mille....
Lawrence Oluyede
rhy...@tiscalinet.it
"Per cambiare, 
per diventare un' altra cosa
dobbiamo prima sapere cosa siamo"
Bruce Lee
On Tue, 20 Jun 2000 20:06:37 +0200, "Emanuele 'H_Draka'"


Il Lettore l'ho finalmente finito...
...Utilizzando la Playsound e non il TMediaPlayer
Però vorrei poter gestire meglio i file wav, ma nell'help di Delphi 4
non c'è documentazione sulla PlaySound (infatti sono andato a
tentativi e poi ce l'ho fatta).
Non è che sapete dove reperire informazioni sull'API Playsound??


 Non č che sapete dove reperire informazioni sull'API Playsound??


> Non è che sapete dove reperire informazioni sull'API Playsound??
