¡Alguna idea de como podre hacer Esto!!

[Anitan]

Tengo 2 problemas de como realizar estas::

1: Un ejemplo tengo un bloc de notas escrito Form9.Show;(ejemplo) como podria ejecutar este bloc de notas.

2: tengo ya finalizado un proyecto y le quiero agregar 1 a varios archivos de musicas de fondo(*.mp3) como podria hacer esto.


Les agredeceria algun comentario!!!

Muchas Grax!!

[Casimiro Notevi]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo (http://www.clubdelphi.com/foros/guiaestilo.php)?, gracias por tu colaboración :)


USO DE LOS SIGNOS DE INTERROGACIÓN Y DE EXCLAMACIÓN Los signos de interrogación (¿ ?) y exclamación (¡ !) encierran enunciados que, respectivamente, interrogan o exclaman. Los primeros se utilizan para delimitar enunciados interrogativos directos; los segundos demarcan enunciados exclamativos, también en estilo directo, e interjecciones. Ejemplos:
¿Comisteis ayer en casa? ¿Dónde has comprado ese traje?
¡Eso es una injusticia!
¡Qué magnífica pintura!
¡Ay! ¡Eh! ¡Oh!

En la utilización de tales signos es preciso tener en cuenta estas consideraciones generales:
Los signos de interrogación y de exclamación son dos en cada caso: los signos que indican apertura (¿ i) y los signos que indican cierre (? !); se colocan al principio y al final del enunciado interrogativo y exclamativo respectivamente.
En nuestra lengua es obligatorio poner siempre el signo de apertura, que no deberá suprimirse a imitación de lo que ocurre en la ortografía de otras lenguas, en las que solo se usa el signo final porque tienen otras marcas gramaticales que suplen el primero.
Después de los signos que indican cierre de interrogación o exclamación (? !) no se escribe nunca punto.
El signo de principio de interrogación (¿) o de exclamación (¡) se ha de colocar donde empieza la pregunta o la exclamación, aunque no comience con él el enunciado. Ejemplos:Con respecto al impacto ambiental, ¿se ha previsto algún tipo de medidas para que su efecto sea el menor posible? Si consigues la plaza, ¡qué alegría se va a llevar tu padre!

Obsérvese cómo los vocativos y las proposiciones subordinadas, cuando ocupan el primer lugar en el enunciado, se escriben fuera de la pregunta o de la exclamación. Sin embargo, si están colocados al final, se consideran dentro de ellas. Ejemplos:Susana, ¿has decidido qué vas a hacer? / ¿Has decidido qué vas a hacer, Sonia? Pepe, ¡cuánto me alegro de que hayas venido! / ¡Cuánto me alegro de que hayas venido, Pepe!
Si no responde, ¿qué le vamos a decir? / ¿Qué le vamos a decir si no responde?

Cuando se escriben varias preguntas o exclamaciones seguidas y estas son breves, se puede optar por considerarlas oraciones independientes, con sus correspondientes signos de apertura y cierre, y con mayúscula al comienzo de cada una de ellas. Ejemplos:¿Dónde estás? ¿A qué hora piensas volver? ¡Quedan cinco minutos! ¡Llegamos tarde! ¡Date prisa!

Pero también es posible considerar el conjunto de las preguntas o exclamaciones como un único enunciado. En este caso hay que separarlas por comas o por puntos y comas, y sólo en la primera se escribirá la palabra inicial con mayúscula. Ejemplos:¿Cómo te llamas?, ¿en qué trabajas?, ¿cuándo naciste?, ¿dónde? ¡Cómo ha nevado esta noche!; ¡qué blanco está todo!;¡qué frío vamos a pasar hoy!

En ocasiones, se utilizan los signos de final de interrogación (?) o de exclamación (!) entre paréntesis.
El signo de final de interrogación entre paréntesis expresa duda o ironía. Ejemplos: Andrés Sánchez López es el presidente (?) de la asociación. Tendría mucha gracia (?) que llegara a la cita con un día de retraso.

El signo de final de exclamación entre paréntesis expresa sorpresa o ironía. Ejemplos:Un joven de treinta y seis años (!) fue el ganador del con curso de composición. Está más gordo que nunca, pero dice que solo pesa ochenta kilos (!) en la báscula de su casa.

[Jose Roman]

No entiendo bien el 1er punto, pero para el 2do debes utilizar recursos y ahi llamarlos mediante el evento OnShow.

[nlsgarcia]

Anitan,


...¡Alguna idea de como podre hacer Esto!...ejecutar este bloc de notas...archivos de musicas de fondo (*.mp3)...



unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ShellAPI, MMSystem, MPlayer;

type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

// Abre el archivo Test.txt con Notepad
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle, 'open', 'Notepad.exe', 'Test.txt', nil, SW_NORMAL);
end;

// Reproduce un Archivo de Sonido MP3
procedure TForm1.Button2Click(Sender: TObject);
var
MediaPlayer: TMediaPlayer;
begin
MediaPlayer := TMediaPlayer.Create(Application);
MediaPlayer.Parent := Self;
MediaPlayer.Visible := False;
MediaPlayer.FileName := 'Heart of Sword.mp3';
MediaPlayer.Open;
MediaPlayer.Play;
end;

// Reproduce un Archivo de Sonido WAV
procedure TForm1.Button3Click(Sender: TObject);
begin
PlaySound('Natasha.wav', 0, SND_FILENAME OR SND_ASYNC);
end;

end.

El código anterior ejecuta el programa Notepad.exe de Windows y reproduce archivos de sonido MP3 y WAV.

Espero sea útil :)

Nelson.

[danielmj]

Hola a todos,

uhmm sino me equivoco nlsgarcia, creo que se refiere a como llamar el form9 desde otro formulario


Procedure Form1.button1.click (sender: Tobject)
begin
form9.show //desestimo si es modal o no
end;


Si es esto, necesitas agregar el form9 a la unidad desde la cual haces la llamada.
No sé si es eso lo que pides Anitan, yo entiendo que si, aunque para ser honesto tampoco comprendo muy bien tu pregunta, espero que te sirva.

Saludos.

[nlsgarcia]

Anitan,


...sino me equivoco nlsgarcia, creo que se refiere a como llamar el form9 desde otro formulario...


Revisa este código:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

Uses Unit9;

procedure TForm1.Button1Click(Sender: TObject);
begin
Form9.Show;
end;

end.

El código anterior llama Form9 desde Form1.

Espero sea útil :)

Nelson.