🚀 go-pugleaf

DJSox wrote:
> The Delphi function ExtractStrings will split a string up into substrings 
> based on a delimiter character.
> 
> Dan
> 
> 
Unfortunately I am not understanding this. I have tried all sorts of 
permuations of the following to no avail. This one returns the error 
"[Pascal Error] frmMainForm.pas(66): E2010 Incompatible types: 'string' 
and 'PAnsiChar'" but no combination of the Strings etc works.

In simple terms, Dataln is a string [Which reads 'Going,randwick,slow'] 
which I need to break out into its components.

==============================================================
var
   MainForm: TMainForm;
   ScratchingsArray: Array of String;
   i: integer;
   idisp: string;
   Dataln: string;
   Contents1: TStringlist;
implementation

{$R *.dfm}

procedure TMainForm.Exit1Click(Sender: TObject);
begin
   Close;
end;


procedure TMainForm.FileSaveAs1Accept(Sender: TObject);
var
   Counter1: Integer;

begin
   Contents1:= Tstringlist.create;
   i:= Scratchings.Lines.Count;
   idisp:= InttoStr(i);
   ShowMessage('Number of lines is '+ idisp);
   Scratchings.Lines.SaveToFile('Southcoast.txt');
   for Counter1 := 0 to i - 1 do
     begin
       Dataln:= Scratchings.Lines.Strings[Counter1];
       ShowMessage('Counter1 is'+InttoStr(Counter1));
       ShowMessage('Data on the line is '+ Dataln);
       If Dataln <> 'Track Conditions' Then
       ExtractStrings([','],[],Dataln,Contents1)   <==================== 
this is the problem line ==========================>
     end;
end;
===========================================================

Many many hours wasted trying all sorts of ways of doing this which in 
Paradox is already operational with a simple one line expression which 
would read

Dataln.breakApart(Contents1,",")