Hola amigo.
Código Delphi
[-]
procedure TForm1.PORT1Click(Sender: TObject);
begin
ComPort.ShowSetupDialog;
end;
Esto te muestra la configuracion del puerto y te permite modificarlo.Si quieres que el puerto sea el com4 pues lo configuras asi en el comport y cada vez que inicies tu programita ese sera el que comienza.
Un Saludo.