Agrupa idiomas fácilmente

.Ventana de ensamblaje Ensamblaje 1

.Subroutine_Button1_Clicked

Diálogo general 1.tipo = 0

Diálogo general 1.filtro = "Ejecutar archivo (*.exe)|*.exe"

Diálogo general 1.open ()

Cuadro de edición 1.content = Diálogo general 1. Nombre del archivo

.Subroutine_Button 3_Clicked

.Nombre de archivo de variable local, tipo de texto

.Encabezado de archivo de variable local, conjunto de bytes

.Fin de archivo de variable local, conjunto de bytes

. Variable local Archivo1, conjunto de bytes

. Archivo de variables locales2, conjunto de bytes

. Archivo de variables locales2, conjunto de bytes

. Variable local Número de archivo, número entero

. Variable local Longitud1, número entero

. Variable local Longitud2, entero

GeneralDialog1.Type = 1

GeneralDialog1.Filter = "Ejecutar archivo (*.exe)|*.exe"

GeneralDialog1. Abrir ()

Nombre de archivo = GeneralDialog1.Nombre de archivo<

GeneralDialog1.Open ()

Nombre de archivo = GeneralDialog1.Nombre de archivo