Browse Source

* switched Constructor Parameter in TextBlock (Left and Right)

master
Bergmann89 8 years ago
parent
commit
322c312a7d
2 changed files with 5 additions and 5 deletions
  1. +3
    -3
      utsRenderer.pas
  2. +2
    -2
      utsTextBlock.pas

+ 3
- 3
utsRenderer.pas View File

@@ -17,7 +17,7 @@ type
function GetTextWidthA(const aFont: TtsFont; const aText: PAnsiChar): Integer;
function GetTextWidthW(const aFont: TtsFont; const aText: PWideChar): Integer;

function BeginBlock(const aTop, aLeft, aWidth, aHeight: Integer; const aFlags: TtsBlockFlags): TtsTextBlock;
function BeginBlock(const aLeft, aTop, aWidth, aHeight: Integer; const aFlags: TtsBlockFlags): TtsTextBlock;
public
class procedure EndBlock(var aBlock: TtsTextBlock);
class procedure AbortBlock(var aBlock: TtsTextBlock);
@@ -49,9 +49,9 @@ begin
end;

////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function TtsRenderer.BeginBlock(const aTop, aLeft, aWidth, aHeight: Integer; const aFlags: TtsBlockFlags): TtsTextBlock;
function TtsRenderer.BeginBlock(const aLeft, aTop, aWidth, aHeight: Integer; const aFlags: TtsBlockFlags): TtsTextBlock;
begin
result := TtsTextBlock.Create(self, aTop, aLeft, aWidth, aHeight, aFlags);
result := TtsTextBlock.Create(self, aLeft, aTop, aWidth, aHeight, aFlags);
end;

////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


+ 2
- 2
utsTextBlock.pas View File

@@ -154,7 +154,7 @@ type

procedure Render;

constructor Create(const aRenderer: TtsBlockRenderer; const aTop, aLeft, aWidth, aHeight: Integer; const aFlags: TtsBlockFlags);
constructor Create(const aRenderer: TtsBlockRenderer; const aLeft, aTop, aWidth, aHeight: Integer; const aFlags: TtsBlockFlags);
destructor Destroy; override;
end;

@@ -802,7 +802,7 @@ begin
end;

////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
constructor TtsTextBlock.Create(const aRenderer: TtsBlockRenderer; const aTop, aLeft, aWidth, aHeight: Integer; const aFlags: TtsBlockFlags);
constructor TtsTextBlock.Create(const aRenderer: TtsBlockRenderer; const aLeft, aTop, aWidth, aHeight: Integer; const aFlags: TtsBlockFlags);
begin
inherited Create(aRenderer);
fRenderer := aRenderer;


Loading…
Cancel
Save