paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-26 10:08:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Allow comma as field separator in data files for fitdemo.

Browse Source 
git-svn-id: trunk@63612 -
This commit is contained in:
wp 2020-07-21 09:23:46 +00:00
parent 31e038d145
commit 28d7ea6732
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/tachart/demo/fit/Main.pas
View File

@ -681,6 +681,9 @@ begin
else else
if pos(#9, L[0]) > 0 then if pos(#9, L[0]) > 0 then
LC.Delimiter := #9 LC.Delimiter := #9
else
if pos(',', L[0]) > 0 then
LC.Delimiter := ','
else begin else begin
ShowMessage('Unknown or no delimiter.'); ShowMessage('Unknown or no delimiter.');
exit; exit;