Hola amigos.
Tengo un problemita con este codigo:
Código Delphi
[-]
procedure TForm1.RunClick(Sender: TObject);
var
aCol, aRow : Integer;
Cad : String;
begin
Cad := Label1.Caption;
aRow := StrToInt('$'+Cad[3])+1;
aCol := StrToInt('$'+Cad[4])+1;
StringGrid1.Col := aCol;
StringGrid1.Row := aRow;
ValorCasilla.Caption:= StringGrid1.Cells[aCol, aRow];
end;
Esto esta trabajando sin problemas desde la address 00 a la FF.Toma el valor de Label1.Caption (Cad)
Código Delphi
[-]
aCol := StrToInt('$'+Cad[4])+1;
Esto esta bien porque esta tomando el valor del digito 4 del Label1(hex es lo que tiene el label)Por eso el StrToInt.
Esta linea de codigo es para recorrer los Col del grid (una linea) 0 a la F tengo mis 16 valores.
esto esta perfecto aqui no hay problema.
El Problema:
Código Delphi
[-]
aRow := StrToInt('$'+Cad[3])+1;
Esta en esta linea. Toma el valor del digito 3 del Label1 y pues solo llegara a la F. La cosa es cuando llega a la FF deberia seguir al address 100h.Pero con este codigo tomando solo el digito 3 ni mandraca el mago lo lograria.
tengo que tener un For i: 1 to 256 y poder lograr que al llegar a la F el maximo valor del digito 3 ya que es Hex entonces que comience a contar con el digito 2 tambien.
¿No se si me explique bien.?
Alguna idea de como lograr esto?
Un Saludo.