Problema con el manejo de punteros?

[delphi.com.ar]

No me había percatado de la línea:

Pinfo:=@info;

, pero de todos modos, PInfo deja de ser un puntero a Info en la línea

GetMem(Pinfo,Buffer);

.

Saludos!

[[Lepe]]

PD: Hay alguna forma de enviar el codigo tabulado?

siiiiiiiiiii, tienes un icono que se llama wrap code tag (el simbolo de la almohadilla del teclado) no veas lo que se agradece un codigo identado

[Amilius]

¿Donde está el famoso ícono "wrap code tag"?

Test:

procedure TFMain.CmbArtefactoChange(Sender: TObject);
var id_nuevo:byte;
begin
id_nuevo:=CmbArtefacto.ItemIndex;
with Archivo.Artefactos[CmbComercio.itemindex][posicion] do
begin
id:=id_nuevo;
modificador:=DefinirModificador(id_nuevo,posicion);
end;
IconoArma.repaint;
PaintBox.repaint;
end;

Al editarlo lo veo identado, pero no así en modo "lectura"..