Por que me aparece siempre este error !! ???
 

Este mensaje me aparece en toodos los programas que he tratado de hacer
EN programas simples:
[Pascal Error] Unit1.pas(1): Unable to invoke Code Parameters due to errors in source code

siempre cuando toi transformando las variable de entrada a valores numericos
Espero que me ayuden .
Atte Snake//

Disculpen las molestias y Gracias

Hola
Bien, y el codigo que haces para que de ese error nos lo imaginamos o mejor lo pones para ver como lo haces?.
Saludos

en un programa simple como suma :

Código Delphi [-]
var

SUM,SUM1,RES:word;
begin
SUM:=strtoint(Edit1.text);  // aqui es en donde me aparece el error :S

si es un error simple disculpenme soy aprendiz y me cuesta aprender leyendo :/

Hola
Empecemos:
Clase basica de programacion #2:

Suma, resta, etc de variables:

La variables pueden ser de varios tipos, string, integer, real (float) etc.....

Ejemplo de suma con variable:
Colocamos tres edit y un boton:
En el evento Onclick del boton ponemos esto:

Código Delphi [-]
var
Num1, num2, Total : Integer;
begin
 Num1:= StrToInt(Edit1.Text);
 Num2:= StrToInt(Edit2.Text);
 Total:= Num1 + Num2;
 Edit3.Text:= IntToStr(Total);

Listo, las variables adquieren el valor de los edit 1 y 2 y el resultado de la suma se coloca en el edit 3.
Saludos

Estaba Guiandome en ejercicios de internet pero que pasa con los Label ?
porque incluyen los Label dentro del codigo!!
eso esta mal entonces ????
Los label nunca se Ingresan dentro del codigo?
ademas he visto Ejercicios como tu ejemplo y aparecen solo 2 edit (las variables de entrada ) y un Label muestra el Resultado :S

¿Que Opinan ?
Gracias Por La Atencion
;)

Hola
Con un hermoso label:

Dos Edit y un label:

Código Delphi [-]
var
Num1, num2, Total : Integer;
begin
 Num1:= StrToInt(Edit1.Text);
 Num2:= StrToInt(Edit2.Text);
 Total:= Num1 + Num2;
 Label1.Caption:= IntToStr(Total);

Feliz?????.:D;)
Saludos

Sorry Si te Molesto demasiado :)
Muchas Gracias !!! :)

Hola
Ahora lo vamos a hacer mas bonito:
Coloca dos edit, un label, un combobox y un boton.

La propiedad Text del combobox la dejamos en blanco (borrala).
Dale click a la propiedad Items (tString), siempre del combobox, en la pantalla que te sale coloca, uno debajo del otro:
+
-
/
*
Ahora en el boton:

Código Delphi [-]
var
Num1, num2, total : Integer;
begin
 Num1:= StrToInt(Edit1.Text);
 Num2:= StrToInt(Edit2.Text);
 case ComboBox1.ItemIndex of
     0 : begin
         Total:= Num1 + Num2;
         end;
     1 : Begin
         Total:= Num1 - Num2;
         end;
     2 : Begin
         Total:= Num1 Div Num2;
         end;
     3 : Begin
         Total:= Num1 * Num2;
         end;
         end;
  Label1.Caption:= IntToStr(Total);
 end;

Listo.
Esto es para numeros enteros si se quieren decimales las variables tienen que ser REAL y en vez de StrToIn, StrToFloat, ademas de FloatToStr en el caption.
Saludos

Hola Caral
Sabes que utilize Numeros Decimales, Con variables Real y utilize StrToFloat Pero Igual Me Aparece Error Puedes Revisarlo ???

Código Delphi [-]
unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Edit1: TEdit;
    Edit2: TEdit;
    Button1: TButton;
    Button2: TButton;
    Label4: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  N1,N2,Total:Real;
begin
  N1:=StrToFloat(Edit1.text);
  N2:=StrToFloat(Edit2.Text);
  Total:=N1+N2;
  Label4.Caption:=FloatToStr(Total);// ¿Como Puedo Hacer Para Colocar Un comentario? Solo Aparece el Numero
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Close;
end;

end.

Hola
El codigo esta bien, que error te da?, donde?.

Por otro lado acerca de tu duda de poner un comentario con el total de la suma:

Código Delphi [-]
var
N1,N2,Total:Real;
begin
N1:=StrToFloat(Edit1.text);
N2:=StrToFloat(Edit2.Text);
Total:=N1+N2;
Label4.Caption:= 'El Total de la suma es = ' +FloatToStr(Total);

Saludos

Ya se no sale error XD
lo que pasaba que ingresaba numeros decimales como el las calculadoras
con puntos
y lo correcto es con comas :D
gracias :D