IOS Как се правибутон за цветен ход в iOS Tint ефект - Огнена маймуна от А до Я

97mik 16

  • Напреднал потребител
  • Потребители
  • 16
  • 98 съобщения
  • Град Брест

Как да промените например стила на бутона за iOS? Така че например не синя черта, а зелена.

Споделете съобщение

Линк към съобщение
Споделете с други сайтове

2 отговора на този въпрос

Представени публикации

правибутон

Свързано съдържание

Как да промените самия хедър, скрола? Отворих стиловия блок, но там можех да променя само цвета на полетата и това е.

ефект

Като цяло се сблъсках с такъв проблем и не знам как да го разреша! Трябва да поставя оформления, бутони, изображения, етикети и т.н. в някакъв контейнер. Тогава трябва да можете да плъзгате всичко това около полето за превъртане и да създадете копие на същия контейнер! Изглежда, че всичко може да се направи, но тук съм в задънена улица, защо? Хвърлих TCalloutRectangle върху формуляра в него позиционирах елементите както ми трябват и го научих да се движи в полето за превъртане!! Седя тук толкова щастлив и гледам кода) procedure TForm1.crtPhaseMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); начало zX := X; zY := Y; zIsDragging := вярно; (Подател като TControl).BringToFront; (Подател като TShape).Fill.Color := TAlphaColorRec.Lightblue; (Подател като TShape).Root.Captured := (Подател като TShape); край; procedure TForm1.crtPhaseMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Single); започнете, ако zIsDragging и (ssLeft в Shift), тогава започнете (Подател като TControl).Position.X := (Подател като TControl).Position.X + X - zX; (Подател като TControl).Позиция.Y := (Подател като TControl).Позиция.Y + Y - zY; // (Подател като TShape).Fill end; край; След това вземам същото радостноКопирам кода от друг проект, където перфектно създадох копия на . procedure TForm1.Button1Click(Sender: TObject); varLayout: TButton; begin Layout := TButton.Create(Gr ; Layout.Position.X := Layout1.Position.X + 10; Layout.Position.Y := Layout1.Position.Y + 10; Layout.Visible := true; Gr > Но тогава горещата маймуна поднася изненада) le. И това означава, че не мога да му предам стила) Но се движи добре във формата) Добре, правя бутон, изглежда, че прилага стила, тромав е, но вероятно е моят джам) Но не се движи във формата и когато щракнете върху него, дава грешка

Първи шанс за изключение при $773ADAE8. Клас на изключение EInvalidCast със съобщение „Невалиден тип на класа“. Процес RPScenarioEditor.exe (4084) Объркан съм какво да правя. Моля те кажи ми.

akRight за TButton в TTabControl не работи правилно, как да заобиколя това? Когато използвате котва върху бутон, десният ръб на бутона изплува извън ръба на лентата с раздели.

правибутон

Здравейте всички! Не съм те виждал от дълго време)) Има такъв проблем: имам Windows 10 и всичко се показва правилно. Имам предвид стилове. В момента нямам възможност да тествам приложението на Windows 7, но прикачвам екранни снимки (Както трябва / Както се показва). Въпрос: Имам ли проблем? Или от страната на FireMonkey?

Мимолетен въпрос: Ако от страна на FireMonkey, тогава как да разберете версията на операционната система, така че когато работите на win7, да информирате потребителя нещо като „Вашата операционна система не се поддържа“?

Допълнителна информация: Използван Delphi XE 10 Seattle.

Последни посетители 0 потребители онлайн

Няма регистриран потребител, който разглежда тази страница