paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-31 17:20:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

Formatting, comment.

Browse Source 
git-svn-id: trunk@52109 -
This commit is contained in:
juha 2016-04-06 10:19:12 +00:00
parent 3594a6b528
commit 2c41ccf609
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazutils/lazutf8.pas
View File

@ -643,7 +643,7 @@ begin
end; end;
{ Find the start of the UTF8 character which contains BytePos, { Find the start of the UTF8 character which contains BytePos,
if BytePos is not part of a valid Utf8Codepoint the function returns BytePos if BytePos is not part of a valid Utf8 Codepoint the function returns BytePos
Len is length in byte, BytePos starts at 0 } Len is length in byte, BytePos starts at 0 }
function UTF8FindNearestCharStart(UTF8Str: PChar; Len: SizeInt; BytePos: SizeInt): SizeInt; function UTF8FindNearestCharStart(UTF8Str: PChar; Len: SizeInt; BytePos: SizeInt): SizeInt;
var var

6
ide/frames/compiler_path_options.pas
View File

@ -639,7 +639,7 @@ begin
// register special buttons in the dialog itself // register special buttons in the dialog itself
btnShowOptions := CreateButton(dlgCOShowOptions); btnShowOptions := CreateButton(dlgCOShowOptions);
btnShowOptions.LoadGlyphFromResourceName(HInstance, 'menu_compiler_options'); btnShowOptions.LoadGlyphFromResourceName(HInstance, 'menu_compiler_options');
btnShowOptions.OnClick := @DoShowOptions; btnShowOptions.OnClick := @DoShowOptions;
// Check // Check
btnCheck := CreateButton(lisCompTest); btnCheck := CreateButton(lisCompTest);
btnCheck.ModalResult := mrNone; btnCheck.ModalResult := mrNone;
@ -650,12 +650,12 @@ begin
// Export // Export
btnExport := CreateButton(lisExport); btnExport := CreateButton(lisExport);
btnExport.OnClick := @DoExport; btnExport.OnClick := @DoExport;
btnExport.Hint := dlgCOLoadSaveHint; btnExport.Hint := dlgCOLoadSaveHint;
btnExport.LoadGlyphFromStock(idButtonSave); btnExport.LoadGlyphFromStock(idButtonSave);
// Import // Import
btnLoadSave := CreateButton(lisImport); btnLoadSave := CreateButton(lisImport);
btnLoadSave.OnClick := @DoImport; btnLoadSave.OnClick := @DoImport;
btnLoadSave.Hint := dlgCOLoadSaveHint; btnLoadSave.Hint := dlgCOLoadSaveHint;
btnLoadSave.LoadGlyphFromStock(idButtonOpen); btnLoadSave.LoadGlyphFromStock(idButtonOpen);
if btnLoadSave.Glyph.Empty then if btnLoadSave.Glyph.Empty then