Bom sou novo no delphi, e tinha um projeto no delphi 7, porem migrei pro xe8 só que deu varios erros de definiçao ...
Reiniciei meu projeto no xe8 mas mesmo assim continuou os erros seguintes... "Cannot resolve unit name 'Winapi.Windows'" e varios outros..
Meu codigo:
unit UCARREGARDADOS;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls,
Vcl.ExtCtrls, Vcl.Imaging.pngimage;
type
TFCARREGARDADOS = class(TForm)
Image1: TImage;
Timer1: TTimer;
barra: TProgressBar;
bporcentagem: TLabel;
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
FCARREGARDADOS: TFCARREGARDADOS;
implementation
uses
System, ULOGIN, UINICIAL;
{$R *.dfm}
procedure TFCARREGARDADOS.Timer1Timer(Sender: TObject);
var
inttostr: TObject;
caption: TObject;
begin
barra.Position:= barra.Position + 2;
if (barra.Position = 100) then
begin
Timer1.Enabled := false
FCARREGARDADOS.Destroy;
FLOGIN. Show;
end;
end;
end.
SOLUCIONANDO ESSE PROBLEMA, EU JA CONSIGO RESOLVER O DAS OUTRAS UNITS TAMBEM QUE OCORRE O MESMO... AGUARDO RESPOSTA, DESCULPE PELA NOBISSE MAS SOU INICIANTE E ESTOU APRENDENDO...