puerto com pantalla vdf
Publicado por djnilo (3 intervenciones) el 25/08/2021 05:09:45
buenas tardes programadores tengo una pantalla vdf conectada a un puerto com
tengo este codigo que esta escrito en delphi
como podria enviar por ejemplo a la pantalla un total ejmplo 2.000 que se ve en esta pantallita
queiro pasar este codigo c #
private void btnEnviar_Click_1(object sender, EventArgs e)
{
try
{
serialPort1.Write(txtTx.Text.Trim());
txtTx.Clear();
}
catch (Exception ex)
{
MessageBox.Show("No se puedo enviar la información", "Error", MessageBoxButtons.OK,
MessageBoxIcon.Error);
}
}
tengo este codigo que esta escrito en delphi
como podria enviar por ejemplo a la pantalla un total ejmplo 2.000 que se ve en esta pantallita
queiro pasar este codigo c #
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
-Guest display instruction----------------
1、initialize guest display to 2400,n,8,1
2、indicator light
Total chr(27)+chr(115)+chr(50)
Change chr(27)+chr(115)+chr(52)
Price chr(27)+chr(115)+chr(51)
3、Send word
chr(27)+chr(81)+chr(65)+8位字符(8 Digital)+chr(13)
Example：（delphi）
procedure GY8Client(Port: string; iLight: Integer; FirstRow: AnsiString);
var s: AnsiString;begin
AssignFile(hPort,Port);
Rewrite(hPort);
case iLight of
1:s:=#27#115#50; //Total
2:s:=#27#115#51; //Price
3:s:=#27#115#52; //Change
end;
s:=s+#27#81#65+trim(FirstRow)+#13;
Write(hPort,s);
end;
private void btnEnviar_Click_1(object sender, EventArgs e)
{
try
{
serialPort1.Write(txtTx.Text.Trim());
txtTx.Clear();
}
catch (Exception ex)
{
MessageBox.Show("No se puedo enviar la información", "Error", MessageBoxButtons.OK,
MessageBoxIcon.Error);
}
}
Valora esta pregunta
0