Solved

Burn DVD from Delphi?

Posted on 2004-04-16
8
1,221 Views
Last Modified: 2012-06-21
http://sourceforge.net/projects/delphineroapi
Here u can find delphineroapi that contains NeroAPI.pas an interface for NeroAPI.dll.
you should have Nero installed to use that interface. it supports NeroSDK-v1.04.

The problem is when trying to burn using
NeroBurn(NeroDeviceHandle, NERO_ISO_AUDIO_CD, NeroWriteCD, Flags,0, @NeroProgress);

that funciton returns error USER_ABORT, opens the CD drive and do not burn. (nobody is aborting the process).

I'm still investigating how can to debug that function as i believe it is in the dll file and can not see the source.

NeroSDK provide a sample program called NeroFiddles u can check it, writen in C++ and works fine.
u can download the project i'm building from here:
http://layalinamag.com/Demo.rar
Thanks in advanced for helping.
0
Comment
Question by:walidn
  • 4
  • 3
8 Comments
 
LVL 2

Expert Comment

by:StTwister
ID: 10846091
0
 
LVL 4

Accepted Solution

by:
mbprogrammer earned 250 total points
ID: 10854776
you can download the full source code for CD DVD burner from DC++ in delphi VCL hub
0
 

Author Comment

by:walidn
ID: 10860364
mbprogrammer it is the first time i hear about DC++, anyways i downloaded it but in the filter couldnt find any hub with the name delphi VCL. can u help here? and tell me from where to download the source code.
0
ScreenConnect 6.0 Free Trial

Check out the updates in one game-changing release, ScreenConnect 6.0, based on partner feedback. New features include a redesigned UI that improves session organization and overall user experience. See the enhancements for yourself!

 
LVL 4

Expert Comment

by:mbprogrammer
ID: 10861975
Downlaod DC++ latest version form : dcplusplus.sourceforge.net
then add this hub : sven.mine.nu with the following accounts :
 user : 0registerme  pass :
   or
 user : 1registerme  pass :
you should have at least 50 mb of delphi components shared for connecting to Delphi VCL (sven.mine.nu) . after connecting, send a private message with the desired username and password
to any available operator, for registering your own account
like this -- > (user/pass).

then he will create an account for you and  you can connect with it later.
you can search for CD DVD burner in search section.
if you want more information send a to mail me.
0
 

Author Comment

by:walidn
ID: 10997757
Private message from VCLBot: <VCLBot> Open at least 2 slots, please.

What is that and how to open 2 sluts sorry slots :)
0
 
LVL 4

Expert Comment

by:mbprogrammer
ID: 10997800
In DC++ do this :
File  --> Settings  ---> Sharing ---> Increase "upload slots"
0
 

Author Comment

by:walidn
ID: 11017028
Oh thanks mbprogrammer, I figured that out.

Let us talk programming now. I got that Long waitted VCL "Magic CD/DVD 1.1.7 ". It is working for I mean it is writing files without errors.
but I have DVD+RW discs, these discs are not formatted, when i burn something using Nero it shows a dialog that it is formatting the disc then it wrties the data.

Magic CD/DVD while trying to burn it gives that error indicating that the disc is not formatted. What shall I do?

>>> BMASPI32
>>> binarymagics.com (SPTI 0)
 
>>> ADD FILES/DIRS TO CD DONE.
>>> STARTING BURNCD ON 0:0:0,G: TEAC    DV-W58G         H4S2
>>> STARTING WRITE PROCESS ON DVD+RW AT 3X
<<< WRITE (10)             (2A) {50|0A} - 0:0:0 <04> [F800] 00 00 00 00 00 00 00 1F 00 00 00 00 00 00 00  | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 = 00 02 70 05 ASC:30,ASQ:10 ILLEGAL REQUEST (MEDIUM NOT FORMATTED)
>>> WRITE/BURNCD PROCESS DONE WITH ERROR
>>> WRITER ERROR [ILLEGAL REQUEST (MEDIUM NOT FORMATTED)]
0
 

Author Comment

by:walidn
ID: 11227747
mbprogrammer.
Thanks man, i managed to make the application successfully with that VCL. Thanks for the help.
By theway to format the DVD just erase it first it will do all the magic.
0

Featured Post

Netscaler Common Configuration How To guides

If you use NetScaler you will want to see these guides. The NetScaler How To Guides show administrators how to get NetScaler up and configured by providing instructions for common scenarios and some not so common ones.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
This video shows how to quickly and easily add an email signature for all users on Exchange 2016. The resulting signature is applied on a server level by Exchange Online. The email signature template has been downloaded from: www.mail-signatures…
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…

803 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question