My first attempts result in compile error: 'Unknown dentifier: LastDelimiter'
I'd also looked at using a TStringList.DelimitedText approach, but haven't attempted it.
I'm mostly trying to find out if LastDelimiter or DelimitedText are supported in TGF. Apologies in advance if this is a really stupid newbie question or syntax. I an clueless, and just want to work within what's supported.
Code: Select all
program LastName;
var
sTmpArtist : string;
sTmpLast : string;
sTmpFull : string;
iPos : integer;
begin
if not tg_Init then exit;
repeat
sTmpArtist := tg_GetField( 'Artist' );
iPos := LastDelimiter(' ', sTmpArtist);
until not tg_Skip;
end;