>I have split the unit uEXE_INI (subdirectory pascal_o_r_mapping/02_Units ) and
>moved the code causing the creation of this entry in a new unit
>uEXE_INI_Global.
Thank you, it is not creating this other file anymore.
James
___
fpc-pascal maillist -
Le 04/05/2021 à 01:55, James Richters via fpc-pascal a écrit :
I’ve been noticing odd behavior in Lazarus.. if I stop the program and
modify the form, then hit the green arrow… none of my for
modifications are shown.. it’s still using the old form.. but if I use
the pull down menus to build
Thanks for the explanation of classes.
I didn’t realize I ended up making it so big, I was trying to keep it able to
fit on a 1280 x 1024 screen.. I guess 1280x1024 is less of a percentage of my
4K screen than I thought. The 2 rows is much nicer. Some of my machine times
and run times get
Le 03/05/2021 à 13:55, James Richters via fpc-pascal a écrit :
>Defining it in public in TText_to_PDF is a good idea.
I tried putting it under the destructor in public… above the private
variables, but it wouldn’t compile thereI thought it would have to be
above all the functions and
>Just for notice: classes and objects are not particular to Lazarus, it's plain
>Object Pascal, understood by Freepascal and Delphi whatever the context(
>console, graphic/Lazarus or javascript/pas2js)
I have some classes and objects in my console programs, but they are there
to get some new
Le 02/05/2021 à 23:42, James Richters via fpc-pascal a écrit :
But I’m thinking I didn’t really define the variable the way it would
normally be done with Lazarus.
Just for notice: classes and objects are not particular to Lazarus, it's
plain Object Pascal, understood by Freepascal and Delphi
I’ve been making progress with learning how to make some modifications myself
to this project, I’ve been pushing them to Github.
I added a custom report title, I have if functioning the way I want it to..
just pulling the report title from the INI file and saving it in a variable,
then
hange(Sender: TObject);
begin
If Not(tFirst.Enabled) Then
Load_from_File;
end;
James
From: fpc-pascal On Behalf Of James
Richters via fpc-pascal
Sent: Sunday, May 2, 2021 9:14 AM
To: 'FPC-Pascal users discussions'
Cc: James Richters ; 'Jean SUZINEAU'
Subject: Re: [fpc-pascal] Di
>>Any ideas how to save and restore the column widths for VirtualStrinTrees in
>>the ini file?
> Done with the events and methods of TIniPropStorage.
Thanks, I see how that works now.
I see you cleaned it all up and made pull down menus.
For some reason, the timer isn’t delaying
Le 01/05/2021 à 15:27, James Richters via fpc-pascal a écrit :
Any ideas how to save and restore the column widths for
VirtualStrinTrees in the ini file?
Done with the events and methods of TIniPropStorage.
___
fpc-pascal maillist -
Sorry, I didn' had time this week to have a look to your last additions.
Le 01/05/2021 à 15:27, James Richters via fpc-pascal a écrit :
Any ideas how to save and restore the column widths for
VirtualStrinTrees in the ini file?
I imagine it can be done through the events of the IniProperty
I’ve been trying to save more things to the configuration.ini file, I’ve
managed to save my Load Time Variable… I was just trying to change
SessionProperties myself, but it wouldn’t work if I tried that.. but if I used
object inspector and click ed on SessionProperties and added it to the list
Thanks for the explanation... phew, what a lot of stuff... no wonder I like my
console programs so much For critical timing applications I have a lot more
control of exactly when things happen... but this project is helping me
appreciate the benefits of a GUI application. I just need to
Le 25/04/2021 à 21:30, James Richters via fpc-pascal a écrit :
>I added LoadFromFile in this event.
That was the first thing I tried, but the problem is, this happens before
anything is put on the screen.. so when I run the program with an Ini file with
4000 entries in it, there is
>I'll try another pull request of something simple just to see if it will
work.
I made another pull request on GitHub,
https://github.com/jsuzineau/pascal_o_r_mapping/pull/3
This one is an attempt to add some text boxes and to use them to display the
totals and to get a time variable
>I added LoadFromFile in this event.
That was the first thing I tried, but the problem is, this happens before
anything is put on the screen.. so when I run the program with an Ini file with
4000 entries in it, there is a good 30 second delay, and then the screen is
shown with
Le 25/04/2021 à 15:24, James Richters via fpc-pascal a écrit :
RE: [fpc-pascal] Directory Tree
I fixed the time totals to show days correctly with this:
I didn't use your pull request because I don't know yet how to handle it.
I have delete some files which differed only by case. After
Le 25/04/2021 à 02:54, James Richters via fpc-pascal a écrit :
RE: [fpc-pascal] Directory Tree
I’ve been trying make “Load from file”happen automatically when the
program starts.. I would like it to happen after configuration.ini
restores the file name and also after the form is on the screen
I fixed the time totals to show days correctly with this:
procedure TTreeData.SetdValue( _dValue: TDateTime);
begin
FdValue:= _dValue;
FValue:='';
If FdValue>=2 Then
FValue:= Format ('%d Days ',[Trunc(FdValue)])
Else
If FdValue>=1 Then
FValue:= Format ('%d Day
-pascal On Behalf Of Jean
SUZINEAU via fpc-pascal
Sent: Saturday, April 24, 2021 9:39 AM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
Le 23/04/2021 à 19:56, James Richters via fpc-pascal a écrit :
Get Checked or Selected works great, but if I push
I’ve been trying make “Load from file” happen automatically when the program
starts.. I would like it to happen after configuration.ini restores the file
name and also after the form is on the screen so I can see the load bargraph.
I tried putting it in Panel1 OnEnter but the form doesn’t
Le 23/04/2021 à 19:56, James Richters via fpc-pascal a écrit :
RE: [fpc-pascal] Directory Tree
Get Checked or Selected works great, but if I push it twice, the
second time I get:
Unable to open file
C:\Users\James\AppData\Local\Temp\FiC152.odt
But I did make sure to close word and the PDF
even one day. I don’t see where the 30 days could possibly be coming from.
James
From: fpc-pascal On Behalf Of Jean
SUZINEAU via fpc-pascal
Sent: Friday, April 23, 2021 8:32 AM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
Le 23/04/2021 à 11:08
Le 23/04/2021 à 11:08, James Richters via fpc-pascal a écrit :
RE: [fpc-pascal] Directory Tree
Now if I type new text in the ODT document, it’s Consolas, but the
actual text in the document is still Liberation Serif… and it doesn’t
align, if I select all the text and change it to Consolas
Now if I type new text in the ODT document, it’s Consolas, but the actual text
in the document is still Liberation Serif… and it doesn’t align, if I select
all the text and change it to Consolas it’s fine.. I tried making a new
template with Word I get a warning that some things won’t be saved
Le 22/04/2021 à 22:17, James Richters via fpc-pascal a écrit :
RE: [fpc-pascal] Directory Tree
My system could not find DejaVuSans,
You can find it in
C:\lazarus\fpc\3.2.0\source\packages\fcl-report\demos\fonts.
May be you don't need to install the font, just add on the line below
where
Le 22/04/2021 à 23:17, James Richters via fpc-pascal a écrit :
For some reason the ODT file wants to know if I want to translate it
from French, and while the font is “Courier New” for anything I would
type into the document, the font of the text itself is “Liberation Serif”
If I change the
: Wednesday, April 21, 2021 6:21 PM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
Another way of seeing is to generate and odt file with the generated text.
You get a slightly better rendering because I could define Courier New as
default font
>But I've included the source code from this project and modified the code to
>produce the pdf.
>I've had trouble with the fonts but it seems to works reasonably well with
>DejaVuSans.
>It's not the ideal font, but box characters are displayed relatively correctly.
>I'm not 100% sure it will
Another way of seeing is to generate and odt file with the generated text.
You get a slightly better rendering because I could define Courier New
as default font in the new template: FileVirtualTree_txt_to_odt.odt
From the OpenOffice "File" menu, you can generate a pdf file.
There is a way
Le 18/04/2021 à 17:22, James Richters via fpc-pascal a écrit :
RE: [fpc-pascal] Directory Tree
I figured out how to make a pdf file, but I don’t know how to
implement it… if we can just have a button to print result.txt… then I
could just change the printer to Microsoft Print to PDF which
I updated Lazarus to Lazarus 2.0.12 / fpc 3.2.0 and that indeed did fix the
default encoding error.
James
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
>I use currently Lazarus 2.0.12 / fpc 3.2.0.
I have Lazarus 2.04 / fpc 3.04 I have fpc 3.2.0 in another directory. It
should be easy enough for me to re-install Lazarus. Thanks for figuring that
out!
>I have corrected this point, it should work now.
Yes it looks fixed even in my large data
Le 18/04/2021 à 16:10, James Richters via fpc-pascal a écrit :
RE: [fpc-pascal] Directory Tree I getuFileVirtualTree.pas(533,9)
Error: identifier idents no member "DefaultEncoding"
It seems, using svn blame, that DefaultEncoding has been added in
FreePascal source trunk on the
lp!
James
-Original Message-
From: fpc-pascal On Behalf Of Jean
SUZINEAU via fpc-pascal
Sent: Saturday, April 17, 2021 8:07 PM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
In Unicode/UTF8 "char" can be represented by seve
In Unicode/UTF8 "char" can be represented by several bytes so my code
won't work.
It seems you use page code 850 (here in France we are in 1252 which
doesn't have the box chars).
In unit uFileVirtualTree line 469, I have added type String850= type
String(850);
declared the local variable
ideas how to get box characters to work?
James
-Original Message-
From: fpc-pascal On Behalf Of Jean
SUZINEAU via fpc-pascal
Sent: Friday, April 16, 2021 6:23 PM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
Le 15/04/2021 à 20:16, James
Le 15/04/2021 à 20:16, James Richters via fpc-pascal a écrit :
It doesn't have to be a PDF, it could be an image file, or even a text
file...maybe I can just make a text file of the output and use box
characters to draw the tree. It seems like I should be able to get the
branches of the
Thanks for the explanations and fixing your sample program. I thought there
would probably be an easy way to save settings in an Ini File
>>Is there a way to export the file list and the second TVirtualStringTree to a
>>PDF file?
>As far as I know, there is no way to directly export it. I will
Le 15/04/2021 à 15:31, James Richters via fpc-pascal a écrit :
How did you make the TVirtualStringTree open the first level? I've been
looking to see how you did it but I don't see how that was done.
unit uFileVirtualTree, line 360, method
ThVirtualStringTree.vst_expand_first_level;
I
>I finally found on my linux machine a 'test_gICAPI\jsLignes.Exclus.txt'
>...
>It should work for you now. I've tested several time checking out the whole
>repository and switching to the TjsDataContexe branch
It does work, but not perfectly. I'm using GitKracken and Github desktop. I
am able
Le 14/04/2021 à 13:06, James Richters via fpc-pascal a écrit :
I still can’t get off the Master branch on my windows machine. I
deleted everything, re-forked it, re-cloned it,
I finally found on my linux machine a 'test_gICAPI\jsLignes.Exclus.txt'
file right in tools directory, and
>I've removed this file. I work both with Linux and Windows, most of the time
>it's ok
I still can’t get off the Master branch on my windows machine. I
deleted everything, re-forked it, re-cloned it,
and I still can’t check out any branch other than Master… It’s not
that
Le 13/04/2021 à 13:50, James Richters via fpc-pascal a écrit :
I tried to make a fork of your repository but I could not change off the master
branch,, I always get an error: Checkout Failed Cannot checkout to invalid
path 'tools/text_glCAPI\jsLignes.Exclus.txt' I suspect the / in the path
with this!
James
-Original Message-
From: fpc-pascal On Behalf Of Jean
SUZINEAU via fpc-pascal
Sent: Sunday, April 11, 2021 6:53 PM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
I have updated the VirtualTreeView example with sub-totals
I have updated the VirtualTreeView example with sub-totals of time.
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
TStringList works pretty much like an inifile section.
The index corresponds to the line number in you text block.
The Names property corresponds to the part of the line before the '=' char.
The ValueFromIndex property corresponds to the part of the line after
the '=' char.
So if you line i
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
Indeed, I think it's difficult (if possible) to change the behaviour of the
multiselection this way.
The TTreeview.MultiSelectStyle property allows you to change from
CtrL+Click to Shift+Click.
https
Indeed, I think it's difficult (if possible) to change the behaviour of
the multiselection this way.
The TTreeview.MultiSelectStyle property allows you to change from
CtrL+Click to Shift+Click.
https://lazarus-ccr.sourceforge.io/docs/lcl/comctrls/tmultiselectstyle.html
To make the multi
is there is a way to change this that isn't super
complicated.
James
-Original Message-
From: fpc-pascal On Behalf Of Jean
SUZINEAU via fpc-pascal
Sent: Friday, April 9, 2021 7:36 PM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
(I re-send my mail
(I re-send my mail with different sender, it seem the first one has been
blocked by orange)
I made a short example based on TTreeView with your data at :
https://github.com/jsuzineau/pascal_o_r_mapping/tree/TjsDataContexte/tools/FileTree
You just need to download all the files , open project
The data I'm trying to display in the tree is a list of filename, but they
aren't the names of the files on the disk, they are modified to include the
time they take to run on a CNC machine. What I have is an INI file with a list
like this:
[Files]
M:\Project1\File1=8:32
M:\Project1\File2=7:43
If you just select files, as Bart stated in another message, I think
TShellTreeView will be more adequate and easier than TTreeView (actually
TShellTreeView is a file tree specific descendent TTreeView).
In TTreeView (and TShellTreeView) you can enable multiselection by
adding
On Behalf Of Jean
SUZINEAU via fpc-pascal
Sent: Tuesday, April 6, 2021 8:46 AM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
As far as I understand, you are searching for a general tree component like
TTreeView in Lazarus, but for FreeVision
SUZINEAU via fpc-pascal
Sent: Tuesday, April 6, 2021 8:46 AM
To: fpc-pascal@lists.freepascal.org
Cc: Jean SUZINEAU
Subject: Re: [fpc-pascal] Directory Tree
As far as I understand, you are searching for a general tree component like
TTreeView in Lazarus, but for FreeVision, running in text mode
On Tue, Apr 6, 2021 at 12:29 PM James Richters via fpc-pascal
wrote:
> Or Am I going to be better off going graphical with Lazarus for something
> like this?
TShellTreeView in Lazarus should do exactly what you want.
It's not console though.
--
Bart
On 2021-04-06 14:43, James Richters wrote:
Is there any documentation or a sample program for TDirListBox? I
tried doing a search but only found a page that showed it's functions
and procedures, but no real explanation on what they are supposed to
do.
The functionality is used within the text
As far as I understand, you are searching for a general tree component
like TTreeView in Lazarus, but for FreeVision, running in text mode in
console ?
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
Is there any documentation or a sample program for TDirListBox? I tried doing
a search but only found a page that showed it's functions and procedures, but
no real explanation on what they are supposed to do.
James
>FPC package FV (FreeVision) contains an object TDirListBox which allows
On 2021-04-06 12:29, James Richters via fpc-pascal wrote:
Does FPC include any tools to display a directory tree, similar to the
way
files and folders are normally displayed, but I want to make my own
custom
entries. Have the branches expand and collapse etc..
It doesn't have to be graphical,
60 matches
Mail list logo
