RS232 do excelu nebo do .txt

[hakamusai]

Jo,data jsou čtena po řádcích (oddělovač #13+#10)

Chápal jsem to tak,že požaduješ nějakou specifickou funkčnost programu a že se to bude dál řešit -tohle jsem poslal jen na odzkoušení.Je to psaný v Delphi.Pokud budeš chtít nějaký úpravy,klidně napiš.Zdrojový kódy programu bych poslal,ale to by nebylo zadarmo.

Jinak ,pokud by jsi se s tím chtěl psát sám,existuje verze zdarma (i pro komerční účely) pod názvem "Turbo Delphi".Na netu se dá najít celá řada příkladů.Já jsem tu část kódu pro rs232 vypích z jednoho komerčního programu,který jsem psal před několika lety.

[vohrablo]

No ono se to dal resit bude, ve finale budu potrebovat porovnavat namerene krivky - proto excel, na nic jineho nemam (mozek).
Ted je pro mne dulezite ty dyta aspon z PICu nejak dostat do PC tak, aby to aspon ten excel pobral. Udelat nejaky interface s zobrazenymi krivkami bych proste nezvladl.

[vohrablo]

Tak jsem nainstaloval TurboDelphi a jsem v pasti. Do tohodle fakt nevidim. Moje posledni programovani bylo pred 16-ti lety na Didaktiku M, od te doby se fakt hodne zmenilo
Takze Delphi jde zase pryc z PC

[hakamusai]

Bez znalostí a zkušenostma s programováním by to byla krkolomná cesta.Já se programováním v Delphi zabejvám 11 let.Začínal jsem na verzi 4.Byly v tom chyby -u některých vcl property nefungovaly jak měly,muselo se to obcházet.Začátky byly šílený. Dva roky jsem psal v DevPascalu (s čistým Win API).Mělo to svý výhody,ale víc nevýhod.Napsat by to v tom taky šlo,ale byla by s tím šílená drbačka.

[vohrablo]

http://elm-chan.org/works/temp4/report.html

tohle jsem nasel, bylo by to presne to, co bych potreboval.
Bohuzel, zjistil jsem, ze az tak daleko VBA neovladam. Ono to totiz nacita v intervalech. Nevedel by nekdo, jak udelat, aby to tam ty data nahrnulo najednou tak, jak prijdou z PICu?

[hakamusai]

Ten VBA zdroj z toho odkazu se dá použít,je ale potřeba v něm udělat zásadní změny.
Doporučuju nastudovat tohle:
http://msdn.microsoft.com/en-us/library/ms810467.aspx
Pro synchronní komunikaci se sériovým portem je třeba použít funkci WaitForSingleObject

[vohrablo]

Tak jsem na to kouknul a jsem jeste vic mimo nez predtim Je to psany necim, cemu absolutne nerozumim (myslim to Ccko nebo co to je, ne anglictinu).
Ten Excelovy sesit jsem trochu poladil, uz to nacita casteji, jen se mi zatim nepodarilo rozchodit zapis do PICu. Pokud to necham nacitat bez synchronizace, prijdou nejaka data, ale jsou tam chyby. Takze ted premyslim, jak si o ty data periodicky rict. Vlastne tak, jak je to v originale.
Bohuzel, dost se ztracim v tech VBA funkcich - jejich parametry, jake vraci hodnoty, kdy a proc...
Googlim uz od patku a zatim jsem z toho vic blbej nez chytrej

Nevis, co znamena to dmy v

dmy = WriteFile(hCommHandle, ByVal Buffer, LenB(Buffer), Count, ByVal 0)

[hakamusai]

dmy je typu BOOL (LongBool).Když funkce WriteFile proběhne v pořádku,návratová hodnota je TRUE a naopak (když ne,tak FALSE).

[vohrablo]

Tak mi z toho uz hrabe.
Nedari se mi z toho nic odeslat. Koukam na port pres serial port monitor a nic. Vypada to, ze port to otevre, ale nic to tam asi neposle nebo co.
Ostatni aplikace posilaji korektne, port spatny nemam

Nezkousel to nekdy nekdo?

[vohrablo]

Tak prozatim vyreseno, tohle mi docela pomohlo:

http://www.parallax.com/ProductInfo/Microcontrollers/PLXDAQDataAcquisitiontool/tabid/393/Default.aspx