Heittäkääpä aloittelijalle vähän ohjeita/vinkkejä mitä kaikkea tarvii ja pitää tietää jos haluaa ohjata Delphillä sarjaporttia.
Joku toimiva pikku esimerkki olis HIANO HOMMA.
Joku toimiva pikku esimerkki olis HIANO HOMMA.
Delphi ja sarjaportti
H
1200
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 1
Vanhimmat
Täältä löytyy:
http://homepages.borland.com/efg2lab/Library/Delphi/IO/PortIO.htm
Lisää saat googlesta vaikka hakusanoilla: Delphi serial port
Tällä esimerkkikoodilla saat listattua Windowsissa kaikki sarjaporttisi ComboBoxiin nimeltä SerialCombo. Ajattelin että voisi olla käytännöllinen sulle.
var i:integer;
with TRegistry.create do
try
rootkey:=HKEY_LOCAL_MACHINE;
if keyexists('HARDWARE') then begin
if openkey('HARDWARE',false)then begin
if keyexists('DEVICEMAP') then begin
if openkey('DEVICEMAP',false)then begin
if keyexists('SERIALCOMM') then begin
if openkey('SERIALCOMM',false)then begin
GetValueNames(SerialCombo.items);
for i:=0 to SerialCombo.items.count-1 do
begin
SerialCombo.items[i]:=ReadString(SerialCombo.items[i]);
end;
end
end;
end;
end;
end;
end;
finally free;
end;