Ver Mensaje Individual
  #5  
Antiguo 12-03-2007
BEPAI BEPAI is offline
Miembro
 
Registrado: feb 2007
Posts: 19
Reputación: 0
BEPAI Va por buen camino
Supongamos este código Turbo Pascal7:



Código Delphi [-]
 

Program Demo;
 
USES
crt,dos,turbo3;
LABEL 
etiqueta;
TYPE 
matriz=array[1..12,1..24]of integer;
VAR 
mat:matriz;
a,b:integer;
cantidad:real;
fic:text;
 
{$I C:\PROGAMAS\UTILIDADES\CALCULADORA.PAS}
 
PROCEDURE CALCULO(VAR A:INTEGER,c,d);
 
type dado=array[1..23,1..12]of char;
var tran:dado;
h,j,i:string[6];
    begin
a:=c*d;
end;
 
BEGIN{...........principal}
CLRSCR;
 
CALCULADORA;
CALCULO;
 
{aquí podriámos por ejemplo meter código puro y duro}
 
for a:=1 to 345 do write('*');
repeat until keypressed;
 
END.
 
{yo hago cosas para salir del paso}
¿cómo colocaría yo todo esto en Delphi, sin entrar en grandes algoritmos?
TODO LO GLOBAL en el Form1 por ejemplo??
Donde iría colocado???.....sin grandes cosas raras y excepciones que creo que las habrá.

Lo que corresponde a Form1 es esto:
Código Delphi [-]
 
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;
type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
end.

..................y supongo que después lo que coloque en un botón para ejecutar, irá colocado de forma similar, porque el código del botón será otra Unit, indepediente, pero en mi caso debe trabajar con esas variables globales de las que te he hablado.

tu lo de propiedades y eventos, no te preocupes, eso lo sé bastante bien, quiero decir que lo entiendo, y ya he practicado creando menús, submenús,........y creo que hasta métodos, etc,.....
En su conjunto entiendo Delphi y como funciona en general. Lo malo es que yo no tengo el nivel, para sacarle todo el rendimiento. Yo hago chapucillas que me sacan de muchos atascos y me alivian en mi trabajo cotidiano, aunque no sea el mejor código.

Con que me ayudes en esto, que creo que es de lo más importante, me haces un gran favor.

Gracias, Dec.
Responder Con Cita