> On Nov 8, 2019, at 5:32 PM, Sven Barth via fpc-pascal
> wrote:
>
> This indeed appears to be a bug, but fixing it leads to some compilation
> problems in Generics.Collections that need to be solved as well. So please
> report this as a bug so that I don't forget it.
Great, thanks.
https:
> On Nov 7, 2019, at 12:28 PM, Ben Grasset via fpc-pascal
> wrote:
>
> {$IF GetTypeKind(T) in [tkInteger, tkInt64, tkQWord]}
> Result := A div B
> {$ELSEIF GetTypeKind(T) = tkFloat}
> Result := A / B
> {$ELSE}
> Result := Default(T);
> {$ENDIF}
This is what I hinted in my
Please create bugreports.
Michael.
On Sat, 9 Nov 2019, AlexeyT via fpc-pascal wrote:
It's obvious this needs to use SetDelimetedText with other params (2nd 3rd)
Procedure TStrings.SetCommaText(const Value: string);
begin
CheckSpecialChars;
C1:=Delimiter;
C2:=QuoteChar;
Delimiter:=','
It's obvious this needs to use SetDelimetedText with other params (2nd 3rd)
Procedure TStrings.SetCommaText(const Value: string);
begin
CheckSpecialChars;
C1:=Delimiter;
C2:=QuoteChar;
Delimiter:=',';
QuoteChar:='"';
Try
SetDelimitedText(Value);
Finally
Delimiter:=C1;
Qu