Ich habe jetzt das PC Tool soweit umgeschrieben, aber der Fehler ist immer noch da.
Ich muss zwar jetzt mal schnell weg, aber später werde ich das mit debugging testen.
Ich denke aber, daß ich auf eine normale (FTDI Serielle -> Xmega )
überspringen werde. Die habe ich Gott sei Dank gleich mit auf der Platine.
Dann muss ich halt SerOutCDC raus nehmen.
EDIT.........
miparo das habe ich dir noch gar nicht gesagt, bei dem Fehler muss ich sogar, ab und zu
den uC neu Programmieren.
Tcomport mag es halt nicht wenn du ihm den Stuhl unter dem Hintern wegziehst.
Zumal den Comport schon default auf aktive stehen hast, das sit nicht schön.
Die Comports erst im OnShow abklappern.
Das sagt ich ja mit dem CDC.
Zur Entwicklungszeit ist ein FDTI besser geeignet bzw. leichter zu Handhaben.
Der CDC ist Top bei Serien wo es auf den Preis ankommt.
miparo ich musste gerade den SerPortCDC raus nehmen, jetzt mit SerPortD0
WUNDERBAR !!
Aber was schlägt sich da ? das muss ja eine ursache haben...
Geht Super !!
Code
function ListDir : boolean;
var
LastDir : TSearchRec;
begin
Writeln(SerOutD0, 'List Volume Items');
if F16_FindFirst('', '*.*', faAnyFile, SR) then
repeat
FileName:= SR.name;
Writeln(SerOutD0, ' - ' + SR.name);
until not F16_FindNext(SR);
endif;
return(true);
end;
Gruß Frank
Harry
Moderator
Gender: Location: zwischen Augsburg und Ulm Age: 59 Posts: 2134 Registered: 03 / 2003
Hi Harry,
dann müssen wir morgen mal ein paar Kaffee über Teamviewer zusammen trinken.
Gerne würde ich ja auch eine gedrehte von dir nehmen, da ich das leider nicht mehr kann.
Kurze PM wenn du Zeit hast.
Note due to EU Cookie Law This page uses cookies to handle logins and unread markers. If you use this forum you allow that this page is storing cookies on your computer. To remove Cookies from this site just click on "Delete cookies of this forum" on the bottom of the page. You can find more infos in our Cookie Policy.