dima/kam-mobile
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Pin stable Castle toolchain compatibility
Sync changed files to Google Drive / sync (push) Successful in 3m16s
Details

Browse Source
This commit is contained in:
admin_d committed 2026-09-15 21:46:19 +05:00
1 parent b8a9fd9d74
commit 2d5e5b94ae
4 files changed
+17 -17
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

code/GameDiagnosticsView.pas
+8 -8
View File
@@ -58,12 +58,12 @@ begin
FScroll := TCastleScrollView.Create(Self);
FScroll.FullSize := True;
FScroll.EnableDragging := True;
Controls.InsertFront(FScroll);
InsertFront(FScroll);
FContent := TCastleVerticalGroup.Create(Self);
FContent.Padding := LayoutMargin;
FContent.Spacing := 8;
FScroll.ScrollArea.Controls.InsertFront(FContent);
FScroll.ScrollArea.InsertFront(FContent);
FStatusLabel := TCastleLabel.Create(Self);
FDetailsLabel := TCastleLabel.Create(Self);
@@ -71,16 +71,16 @@ begin
FFileIOButton := TCastleButton.Create(Self);
FExportButton := TCastleButton.Create(Self);
FContent.Controls.InsertFront(FExportFeedbackLabel);
FContent.InsertFront(FExportFeedbackLabel);
FExportButton.Caption := 'Export Report';
FExportButton.OnClick := @ExportClick;
FContent.Controls.InsertFront(FExportButton);
FContent.Controls.InsertFront(FDetailsLabel);
FContent.Controls.InsertFront(FStatusLabel);
FContent.InsertFront(FExportButton);
FContent.InsertFront(FDetailsLabel);
FContent.InsertFront(FStatusLabel);
FFileIOButton.Caption := 'Test File I/O';
FFileIOButton.OnClick := @FileIOClick;
FContent.Controls.InsertFront(FFileIOButton);
with TCastleLabel.Create(Self) do begin Caption := 'Tests / Diagnostics'; FContent.Controls.InsertFront(Self); end;
FContent.InsertFront(FFileIOButton);
with TCastleLabel.Create(Self) do begin Caption := 'Tests / Diagnostics'; FContent.InsertFront(Self); end;
end;
procedure TDiagnosticsView.UpdateWrapWidth;
code/GameSelectedMap.pas
+1 -1
View File
@@ -16,7 +16,7 @@ uses
function SelectedMapUrl: string;
begin
Result := 'castle-data:/game/' + UrlEncode(SelectedMapRelativePath);
Result := 'castle-data:/game/' + SelectedMapRelativePath;
end;
end.