Capturar Imagen y guardarla

[ronald_tro]

Hola amigos de nuevo, tengo una duda, he buscado en la red y no encuentro respuesta a ver si ustedes me hechan una manita, capturo una imagen de la webcam pero al guardarla me sale el dialogo que uso, el codigo es este:
begin
IF Ventana <> 0 THEN
BEGIN
Guardar.FileName := 'Captura de la imagen';
Guardar.DefaultExt := 'jpg';
Guardar.Filter := 'Fichero kpg (*.jpg)*.jpg';
IF Guardar.Execute THEN
SendMessage(Ventana, WM_CAP_SAVEDIB, 0,
longint(pchar(Guardar.FileName)));
END;

mi pregunta es, como puedo hacer para que capture la imagen y guardarla en algun directorio por ejemplo en el c, o yo darla la ruta ,que cada vez que le de click en capturar, no me de la opcion de donde guardarla si no que la guarde automaticamente en un directorio o ruta, gracias por sus respuestas, bye.

[ronald_tro]

Ya pude amigos, mil gracias espero no molestarlos, saludos

[Neftali [Germán.Estévez]]

Estaría muy bien que postearas la solución que has encontrado para futuros compañeros que puedan tener la misma duda.

Un saludo.

[ronald_tro]

Ok amigo, no habia entrado mil disculpas, el codigo es el siguiente:

IF Ventana <> 0 THEN
BEGIN
Guardar.FileName := 'Captura de la imagen';
Guardar.DefaultExt := 'jpg';
Guardar.Filter := 'Fichero kpg (*.jpg)*.jpg';
SendMessage(Ventana, WM_CAP_SAVEDIB, 0,
longint(pchar('c:\foto.jpg')));