Cd romm wysowanie

0

co zorbic zeby wsunąc i wysunąc cdrom za pomoca jednego przycisku
mam kod

mciSendString('Set cdaudio door open wait',nil,0,handle);
wysuń
mciSendString('Set cdaudio door closed wait',nil,0,handle); wsuń

ale nie wiem gdzie go wcisnąc
trzeba zkorzystac z modulu mmsytem ale nie moge tego znaleŹĆ i z czym to sie je

to chyba tyle

---= pozdraiwam Oskar =-

0

do uses dodajesz MMSYSTEM

0

Na samej górze unitu wpisz MMSystem tam gdzie inne unity są (Windows, Classes, Messages itp.)
Potem tworzysz obsługę OnClick w przycisku (2xlpm) i tam wpisujesz tę linijkę wysunięcia. Jeśli dobrze zrozumiałem to chcesz szufladkę Od razu zamknąć to dopisz ją pod pierwszą. Trzeba jeszcze dać czas CDkowi ale żeby równocześnie nie zawieszać programu to trzeba by było w osobnym wątku to dać lub na Timerze - a to za dużo kombinowania jak na takie coś więc tą drugą linijke daj do drugiego przycisku.

Czy sam kod jaki podałeś jest dobry - nie wiem. Sprawdź w FAQ - tam jest napisane.--Delphi 6
Pozdrowienia,
Imperior

0

problem sie zaczyna jak chce wysonąc drugi cd-room znaczys sie nie wysuwa przy okazji jak wykryc czy cos jest w cd-roomie ---= pozdrawiam Oskar =-

0

Możesz napisać prockę która będzie odczytywać plik z płyty (jeśli znasz nazwę pliku) lub sprawdzająca pojemnoś płyty jęśli podczas sprawdzania płyty wystąpi wyjątek możesz przeskoczyć do linijki z odpowiednio napisanym komunikatem.--Pracuję w Delphi 5

Pozdrawiam
RockY
[email protected],pl

0

no ja akurat chce zeby pliki i katalogi byly zapisywane w pliku html ale nie znam konkretnej nazwy pliku chce zeby wszystko znalazł na plycie w/g podanego kryteriun np wyszukaj pliki zip ---= pozdrawiam Oskar =-

0

no i co zrobic zeby mozna bylo wybierac ktory cd room ma byc wysuniety ???
jak mam dwa a moze kiedys sobie dvd sprawie ---= pozdrawiam Oskar =- (delphi 6 GG:2792614)

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0