forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix, windows, empty line in call tips

This commit is contained in:
Basile Burg 2016-02-08 16:30:28 +01:00
parent f7cb97831c
commit 1ff8b9e878
2 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/ce_dcd.pas
View File

@ -390,7 +390,11 @@ begin
// //
fTempLines.Delete(0); fTempLines.Delete(0);
tips := fTempLines.Text; tips := fTempLines.Text;
{$IFDEF WINDOWS}
tips := tips[1..tips.length-2];
{$ELSE}
tips := tips[1..tips.length-1]; tips := tips[1..tips.length-1];
{$ENDIF}
end; end;
procedure TCEDcdWrapper.getComplAtCursor(aList: TStrings); procedure TCEDcdWrapper.getComplAtCursor(aList: TStrings);

5
src/ce_synmemo.pas
View File

@ -1029,6 +1029,11 @@ begin
fCallTipStrings.Objects[0] := TObject(pointer(i)); fCallTipStrings.Objects[0] := TObject(pointer(i));
{$POP} {$POP}
str := fCallTipStrings.Text; str := fCallTipStrings.Text;
{$IFDEF WINDOWS}
str := str[1..str.length-2];
{$ELSE}
str := str[1..str.length-1];
{$ENDIF}
showCallTips(str); showCallTips(str);
end; end;
end; end;