Это - достаточно беспорядочный архив сообщений конференций сети fidonet, которые на момент их прочтения мной
показались полезными или интересными. Многие устарели, многие узкоспецифичны и малоинтересны, но может оказаться и что-то новое...
- __techs (2:5015/42) ----------------------------------------------- __techs - Msg : 514 of 1000 From : Ilya Rodichev 2:5015/44.8 11 Oct 97 21:23:46 To : Alexey Pavlenko 13 Oct 97 17:38:40 Subj : cd проигрыватель ------------------------------------------------------------------------------- @AREA:RU.CBUILDER Good day/night/etc., Alexey! Fri Oct 10 1997 23:05, Alexey Pavlenko(2:5020/788) wrote to All: AP> Вот не допеp я сегодня - сам то пpоигpыватель дело двyх кнопок :-) , а вот AP> как заставить показывать номеp тpэка и вpемя до конца напpимеp... AP> Знаю , что завязано все на label , timer и bevel , но обpаботчик события AP> какой писать.....? Вот кусок, который показывает текущй трэк, его длину и время от начала трека. И, обрати внимание, никаких bevel'ов ;-) === Cut === void __fastcall TForm1::Timer1Timer(TObject *Sender) { char CurTrack[1000], TrackLen[1000], TrackPos[1000]; mciSendString("status cdaudio current track", CurTrack, 1000, 0l); Label1->Caption = CurTrack; // current track AnsiString Cmd; Cmd = "status cdaudio length track " + AnsiString(CurTrack); mciSendString(Cmd.c_str(), TrackLen, 1000, 0l); Label2->Caption = TrackLen; // current track length Cmd = "status cdaudio position"; mciSendString(Cmd.c_str(), TrackPos, 1000, 0l); Position->Caption = TrackPos; // current track position } === Cut === Ilya. PS 2All: Объясните pls. назначение AllocBy у TListView. Судя по хелпу, при использовании AllocBy должно наблюдаться ускорение при добавлении итемов, чего imho не происходит. --- Ir. * Origin: <Things will never be the same...> (FidoNet 2:5015/44.8)
