mariano22,
Cita:
Empezado por mariano22
...Necesito desde una aplicación en Delphi 7, abrir un archivo de Arduino y ejecutar la acción "Upload" o cargar para que transfiera el code de Arduino a una Arduino UNO ya conectada previamente...
|
¡Bienvenido al Club Delphi!
Pregunto: ¿La opción Upload que comentas tiene como propósito transferir el archivo
C:\Archivos de programa\Arduino\examples\01.Basics\Blink\Blink.ino al
Arduino UNO ya conectado previamente al PC vía USB?
Si la respuesta es
Si, revisa este código:
Código Delphi
[-]
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
public
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
FromFileName, ToFileName : String;
begin
FromFileName := 'C:\Archivos de programa\Arduino\examples\01.Basics\Blink\Blink.ino';
ToFileName := 'X:\Arduino UNO\Blink.ino';
Copyfile(PChar(FromFileName),PChar(ToFileName),False);
end;
end.
El código anterior en Delphi 7 sobre Windows 7 Professional x32,
copia un archivo .ino a una unidad mapeada en la PC de un Arduino UNO por medio de un puerto USB.
Te comento que la función
ShellExecute tiene por finalidad realizar una acción (
Abrir, Imprimir, Ejecutar) sobre un archivo externo a Delphi (En este caso particular),
dado que los archivos .ino son código fuente de Arduino, la función no sera de utilidad en la forma que se detalla en el
Msg #1.
Examina el código sugerido y en caso de que este no se adapte a lo requerido en tu proyecto,
comenta con más detalle el proceso de Upload del Código de Arduino al Arduino UNO para poder analizar con mayor información tu requerimiento.
Revisa esta información:
Te sugiero leer la
Guía de estilo de los foros, recomendada a todos los nuevos ingresos al Club Delphi.
¡Gracias por tu cooperación!
Saludos,
Nelson.