paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-02 09:40:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed typo

Browse Source 
git-svn-id: trunk@8725 -
This commit is contained in:
mattias 2006-02-10 12:15:21 +00:00
parent 1687699a68
commit e76dfaf3bd
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
languages/lazaruside.de.po
View File

@ -1514,7 +1514,7 @@ msgstr "Kopiere die Auswahl in die Zwischenablage"
#: lazarusidestrconsts:dlgcopywordatcursoroncopynone #: lazarusidestrconsts:dlgcopywordatcursoroncopynone
msgid "Copy word on copy none" msgid "Copy word on copy none"
msgstr "Kopiere Wort wenn nichts ausgeweählt" msgstr "Kopiere Wort wenn nichts ausgewählt"
#: lazarusidestrconsts:liscopyingawholeformisnotimplemented #: lazarusidestrconsts:liscopyingawholeformisnotimplemented
msgid "Copying a whole form is not implemented." msgid "Copying a whole form is not implemented."

6
lcl/lclproc.pas
View File

@ -209,7 +209,7 @@ function DbgS(const i: int64): string; overload;
function DbgS(const r: TRect): string; overload; function DbgS(const r: TRect): string; overload;
function DbgS(const p: TPoint): string; overload; function DbgS(const p: TPoint): string; overload;
function DbgS(const p: pointer): string; overload; function DbgS(const p: pointer): string; overload;
function DbgS(const e: extended): string; overload; function DbgS(const e: extended; MaxDecimals: integer = 999): string; overload;
function DbgS(const b: boolean): string; overload; function DbgS(const b: boolean): string; overload;
function DbgSName(const p: TObject): string; overload; function DbgSName(const p: TObject): string; overload;
function DbgSName(const p: TClass): string; overload; function DbgSName(const p: TClass): string; overload;
@ -1352,9 +1352,9 @@ begin
Result:=HexStr(PtrInt(p),2*sizeof(PtrInt)); Result:=HexStr(PtrInt(p),2*sizeof(PtrInt));
end; end;
function DbgS(const e: extended): string; function DbgS(const e: extended; MaxDecimals: integer): string;
begin begin
Result:=FloatToStr(e); Result:=copy(FloatToStr(e),1,MaxDecimals);
end; end;
function DbgS(const b: boolean): string; function DbgS(const b: boolean): string;