hola.
tengo un problemita quiero un boton que ejecute una acción de acuerdo a cierta condición.... ejemplo:
Código:
procedure Taa.btn1Click(Sender: TObject);
begin
if Num = 0 then
begin
pbyte(Resultado)^:=20;
end;
if Num = 1 then
begin
pbyte(Resultado)^:=30;
end;
end;
el detalle al ejecutar y presionar el boton no hace nada... al parecer no reconocer esa condicion de if.