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

docs, update required Lazarus version and warn if compiled with laz < 2.2

This commit is contained in:
Basile Burg 2022-05-15 23:22:09 +02:00
parent d61e2120fb
commit 8831790057
4 changed files with 13 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
docs/build.md
View File

@ -8,7 +8,7 @@ Dexed is mostly programmed in Object Pascal, using the the [Lazarus development
## Pre-requisites
* Git
* [Download](http://lazarus.freepascal.org/index.php?page=downloads) and setup the latest Lazarus version (>= 2.0.10) and FPC + FPC sources (= 3.2.0) for your platform.
* [Download](http://lazarus.freepascal.org/index.php?page=downloads) and setup the latest Lazarus version (>= 2.2.0) and FPC + FPC sources (= 3.2.2) for your platform.
* Windows: the three packages are bundled in an installer.
* Linux: the three packages must be downloaded and setup individually. It's recommended to download the packages from _SourceForge_ and not from the official repository of the distribution because they don't always propose the latest version.
* [Download](https://github.com/ldc-developers/ldc/releases) and setup LDC2, the LLVM-based D compiler. It is used to compile the part of the IDE that's written in D, a library called _libdexed-d_. LDC2 binaries must be visible in the system PATH variable. Note that building _libdexed-d_ is automatic.

4
src/u_main.pas
View File

@ -1758,6 +1758,8 @@ begin
DockMaster.MakeDockSite(Self, [akBottom], admrpChild);
DockMaster.OnShowOptions := @ShowAnchorDockOptions;
{$if lcl_fullversion < 2020000}
{$WARNING It is deprecated to use Lazarus 2.0.z to build dexed}
{$WARNING Support will be removed after Lazarus 2.2.2 release}
DockMaster.HeaderStyle := adhsPoints;
{$else}
DockMaster.HeaderStyle := 'Points';
@ -3764,6 +3766,8 @@ begin
end;
{$if lcl_fullversion < 2020000}
{$WARNING It is deprecated to use Lazarus 2.0.z to build dexed}
{$WARNING Support will be removed after Lazarus 2.2.2 release}
procedure TMainForm.updateFloatingWidgetOnTop(onTop: boolean);
var
widg: TDexedWidget;

6
src/u_synmemo.pas
View File

@ -848,6 +848,8 @@ begin
// - TextView visibility is increased so this is not the standard way of getting the infos.
{$if lcl_fullversion < 2020000}
{$WARNING It is deprecated to use Lazarus 2.0.z to build dexed}
{$WARNING Support will be removed after Lazarus 2.2.2 release}
start := fMemo.TextView.CollapsedLineForFoldAtLine(i);
{$else}
start := TSynEditFoldedView(fMemo.TextViewsManager.SynTextViewByClass[TSynEditFoldedView]).CollapsedLineForFoldAtLine(i);
@ -885,6 +887,8 @@ begin
if not itm.isCollapsed then
continue;
{$if lcl_fullversion < 2020000}
{$WARNING It is deprecated to use Lazarus 2.0.z to build dexed}
{$WARNING Support will be removed after Lazarus 2.2.2 release}
fMemo.TextView.FoldAtLine(itm.lineIndex-1);
{$else}
TSynEditFoldedView(fMemo.TextViewsManager.SynTextViewByClass[TSynEditFoldedView]).FoldAtLine(itm.lineIndex-1);
@ -1172,6 +1176,8 @@ begin
fModified := false;
{$if lcl_fullversion < 2020000}
{$WARNING It is deprecated to use Lazarus 2.0.z to build dexed}
{$WARNING Support will be removed after Lazarus 2.2.2 release}
TextBuffer.AddNotifyHandler(senrUndoRedoAdded, @changeNotify);
{$else}
TextViewsManager.SynTextView[0].AddNotifyHandler(senrUndoRedoAdded, @changeNotify);

2
src/u_synmultiguttermarks.pas
View File

@ -95,6 +95,8 @@ begin
aFirstCustomColumnIdx := 0;
{$if lcl_fullversion < 2020000}
i := FoldView.TextIndex[aScreenLine];
{$WARNING It is deprecated to use Lazarus 2.0.z to build dexed}
{$WARNING Support will be removed after Lazarus 2.2.2 release}
{$else}
aScreenLine := aScreenLine + ToIdx(GutterArea.TextArea.TopLine);
i := ViewedTextBuffer.DisplayView.ViewToTextIndexEx(aScreenLine, iRange);