Учусь программировать, вот пытался сделать текстовую игру, вопрос к опытным программистам, как упростить код? А то я в этом дуб дубом. Ссылки оставлю, можете посмотреть.
Писал на Delphi.
Ссылки:
Игра: https://cloud.mail.ru/public/5C5H/ctpZ9NZen
Исходник: https://cloud.mail.ru/public/9u7n/xrJ4zDJYP
Не судите, что сюжет короткий и не очень. я только учусь.
Во вторых можно сделать одну процедуру "онклик" и там по сендеру смотреть.
Придумать какую-то логику, а не тупые клики по лэйбелам. Все хранить в бд.
Хотя бы не в бд, а в ини или хмл файле
Var
Settings: TSettings;
VarBut: TSpeedButton;
Procedure TSettings.ButtonChanger(Page: Integer; Sender: TObject);
Begin
If (VarBut <> Nil) Then
VarBut.Flat := False;
VarBut := Sender As TSpeedButton;
VarBut.Flat := True;
Pages.Pages[Page].Show;
End;
Вот так по сендеру можно работать (это очень старый и очень плохой код)
спасибо что уделили мне минутку своего драгоценного времени. по поводу картинок, как их можно поставить на фон, и что-бы они менялись при каком нибудь действии? а то растягивать и видимость им выключать как-то вроде не так.
запихать все в ресурс и просто менять переодически источник.
Или блобом (бинарником) записать в бд и читать
