задача

Требуется переписать код
Там где процедуры:
procedure TMainForm.VrMeterI1Click(Sender: TObject);
begin
SendCmd($E1, ApdComPort1);
-- — -- — -- — --- — -- — --- --- --- --- --
и так далее......
Изменить формат или убрать SendCmd,чтобы передача происходила по беспроводной сети
Просто переписать это код, те сделать тоже самое только другим вариантом.
ссылку на файл скину.