[*Caro*]

Hola, si quieres copiar desde el CD-ROM, entonces tendrías primero que ver a que letra pertenece la unidad de CD_ROM, podrías hacer algo como esto:

Código Delphi [-]
var
 Drive:Char;
 CDROM : String;
 Tipo:Integer;
begin
 for drive:= 'A' to 'Z' do
  begin
   Tipo := GetDriveType(PChar(drive+':\'));
   if Tipo=DRIVE_CDROM then
    begin
     CDROM := drive+':\';
     break;
    end;
  end;

ahora haces el copiado desde esa unidad.

Código Delphi [-]
COPYFILE (PCHAR(CDROM+'BERNARDO.DOC'), PCHAR ('F:\BERNARDO.DOC'), TRUE) ;

Saluditos