You are not logged in. You can browse in the PowerBASIC Community, but you must click Login (top right) before you can post. If this is your first visit, check out the FAQ or Sign Up.
can you or someone retranslate this program to PBWin ?
Translating that would be rather pointless since well over 90% of that application is involved in the console display.
You could do it a LOT more easily in PBWin 10 from scratch.
Basically all you need to do is
1. Parse the data file into a large array. (PARSECOUNT and PARSE are a lot easier than Manuel's cumbersome process)
2. Use a (virtual?) Listview to display selected sections of the data.
I re-indented the code in Source Code. And made one notable change -
Code:
SCA = con.inshift '<<==== added before the SELECT CASEs
select case ucase$(O$)
'IF MID$(BIN$(INSHIFT,8),5,1)="1" THEN '<<=== replaced this
if bit(SCA, 3) then 'If left control down '<<=== with this (no convert to string then MID$()
in multiple places.
I suggest change from console to TXT.WINDOW as more "do-able". Then it may be compiled in PBWin or PBCC. Also F1 takes me to MSDN instead of help in the code.
Answering to Tim I forgot to point out that the code was intended specifically for PBCC, to handle big CSV files, meaning 10 million lines with tens of fields. That seems to me difficult and slower to handle with a single big array.
We process personal data about users of our site, through the use of cookies and other technologies, to deliver our services, and to analyze site activity. For additional details, refer to our Privacy Policy.
By clicking "I AGREE" below, you agree to our Privacy Policy and our personal data processing and cookie practices as described therein. You also acknowledge that this forum may be hosted outside your country and you consent to the collection, storage, and processing of your data in the country where this forum is hosted.
Comment