All pastes #801472 Raw Edit

Untitled

public text v1 · immutable
#801472 ·published 2007-11-29 09:02 UTC
rendered paste body
procedure TForm1.RadioButton1Click(Sender: TObject);
var
xmiddle1:char;
begin
xmiddle1:='M';
end;