Erro simples em programa delphi

1 resposta
programação
A

Boa noite. Estou seguindo o seguinte tutorial: http://portal.tdevrocks.com.br/2014/09/14/tutorial-criando-meu-app-step-by-step-parte-i/.
Quando fui compilar o seguinte código deu erros:

nit UntMain;

interface

uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.ListBox,
FMX.Layouts, FMX.Objects, FMX.Ani;

type

TfrmMain = class(TForm)

lytMain: TLayout;

lstmnuMain: TListBox;

lstgrpListas: TListBoxGroupHeader;

lstiltitulos: TListBoxItem;

lstitUsuarios: TListBoxItem;

lstitTitulosAlugados: TListBoxItem;

lstgrpConfig: TListBoxGroupHeader;

lstitLogin: TListBoxItem;

AnimateDrawer: TFloatAnimation;

recBackground: TRectangle;

procedure lstgrpListasClick(Sender: TObject);

private

{ Private declarations }

procedure HideMenu;

procedure ShowMenu;

public

{ Public declarations }

end;

var
frmMain: TfrmMain;

implementation

{$R *.fmx}
{$R *.NmXhdpiPh.fmx ANDROID}

procedure TfrmMain.HideMenu;

begin

lstMnuMain.AnimateFloat(Position.X, -Self.ClientWidth);
AnimateDrawer.StartValue := Self.ClientWidth - 40;

AnimateDrawer.StopValue := 0;

AnimateDrawer.Start;

end;

procedure TfrmMain.ShowMenu;

begin

AnimateDrawer.StartValue :=0;

AnimateDrawer.StopValue := Self.ClientWidth - C_MnuEspaco;

AnimateDrawer.Start;

lstMnuMain.AnimateFloat(‘position.x’, 0);

ShowBackground(Self.lytMain, CancelMenu); </pre>

<pre>

end;

end.

Mensagens do compilador::

Checking project dependencies

Compiling LocadoraDelphi.dproj (Debug, Win64)

dcc64 command line for LocadoraDelphi.dpr

e:\app\bin\dcc64.exe -$O- -$W+ --no-config -M -Q -TX.exe -AGenerics.Collections=System.Generics.Collections;

Generics.Defaults=System.Generics.Defaults;WinTypes=Winapi.Windows;WinProcs=Winapi.Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE -DDEBUG

-E.\Win64\Debug -Ie:\app\lib\Win64\debug;e:\app\lib\Win64\release;C:\Users\luiz_\Documents\Embarcadero\Studio\20.0\Imports;e:\app\Imports;

C:\Users\Public\Documents\Embarcadero\Studio\20.0\Dcp\Win64;e:\app\include -LEC:\Users\Public\Documents\Embarcadero\Studio\20.0\Bpl\Win64

-LNC:\Users\Public\Documents\Embarcadero\Studio\20.0\Dcp\Win64 -NU.\Win64\Debug -NSWinapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;

System;Xml;Data;Datasnap;Web;Soap; -Oe:\app\lib\Win64\release;C:\Users\luiz_\Documents\Embarcadero\Studio\20.0\Imports;e:\app\Imports;

C:\Users\Public\Documents\Embarcadero\Studio\20.0\Dcp\Win64;e:\app\include -Re:\app\lib\Win64\release;

C:\Users\luiz_\Documents\Embarcadero\Studio\20.0\Imports;e:\app\Imports;C:\Users\Public\Documents\Embarcadero\Studio\20.0\Dcp\Win64;e:\app\include

-Ue:\app\lib\Win64\debug;e:\app\lib\Win64\release;C:\Users\luiz_\Documents\Embarcadero\Studio\20.0\Imports;e:\app\Imports;

C:\Users\Public\Documents\Embarcadero\Studio\20.0\Dcp\Win64;e:\app\include -V -VN -VR -NBC:\Users\Public\Documents\Embarcadero\Studio\20.0\Dcp\Win64

-NHC:\Users\Public\Documents\Embarcadero\Studio\20.0\hpp\Win64 -NO.\Win64\Debug LocadoraDelphi.dpr

[dcc64 Warning] UntMain.pas(41): W1000 Symbol AnimateFloat is deprecated: Use FMX.Ani.TAnimator instead

[dcc64 Error] UntMain.pas(54): E2003 Undeclared identifier: C_MnuEspaco

[dcc64 Warning] UntMain.pas(57): W1000 Symbol AnimateFloat is deprecated: Use FMX.Ani.TAnimator instead

[dcc64 Error] UntMain.pas(59): E2003 Undeclared identifier: ShowBackground

[dcc64 Error] UntMain.pas(59): E2003 Undeclared identifier: CancelMenu

[dcc64 Error] UntMain.pas(59): E2029 Statement expected but < found

[dcc64 Error] UntMain.pas(60): E2029 Expression expected but < found

[dcc64 Warning] UntMain.pas(60): W1023 Comparing signed and unsigned types - widened both operands

[dcc64 Error] UntMain.pas(61): E2029 Expression expected but END found

[dcc64 Error] UntMain.pas(22): E2065 Unsatisfied forward or external declaration: TfrmMain.lstgrpListasClick

[dcc64 Hint] UntMain.pas(25): H2219 Private symbol HideMenu declared but never used

[dcc64 Hint] UntMain.pas(26): H2219 Private symbol ShowMenu declared but never used

[dcc64 Fatal Error] LocadoraDelphi.dpr(6): F2063 Could not compile used unit UntMain.pas

Failed

Elapsed time: 00:00:01.3

Se alguém puder ajudar, agradeço.

Valeu. Fiquem em paz.

1 Resposta

TerraSkilll

Você ainda não concluiu todo o código do exemplo no site. As mensagens de erro se referem à métodos que estão mais abaixo no código do tutorial, por isso você precisa concluir tudo antes de tentar compilar.

PS: remova do seu código todas as partes em que está escrito <pre> e </pre> . Isso não faz parte do código da aplicação.

Abraço.

Criado 1 de abril de 2019
Ultima resposta 2 de abr. de 2019
Respostas 1
Participantes 2