Ir para conteúdo
Sistema de Servidores de Jogos ×

  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.

Error: RLINK32: Too Many Resources to handle

Davi Uzumaki

Por ,
em Dúvidas & Ajuda

 Compartilhar

Posts Recomendados

Davi Uzumaki Contribuidor

Davi Uzumaki 0

Postado
  • Contribuidor
Postado

Delphi Error: RLINK32: Too Many Resources to handle

 

Estava criando um navegador, quando terminei, que mandei executar para ver se estava tudo certinho, ele deu esse erro...

 

[Error]Error: RLINK32: Too Many Resources to handle

 

unit Unit1;

 

interface

 

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, ComCtrls, ImgList, ToolWin, OleCtrls, SHDocVw_EWB, EwbCore,

EmbeddedWB, Menus, StdCtrls;

 

type

TForm1 = class(TForm)

CoolBar1: TCoolBar;

ImageList1: TImageList;

ToolBar1: TToolBar;

ToolButton1: TToolButton;

ToolButton2: TToolButton;

ToolButton3: TToolButton;

ToolButton4: TToolButton;

ToolButton5: TToolButton;

ToolButton6: TToolButton;

ToolButton7: TToolButton;

ComboBoxEx1: TComboBoxEx;

MainMenu1: TMainMenu;

Arquivo1: TMenuItem;

NovaPagina1: TMenuItem;

SalvarComo1: TMenuItem;

Imprimir1: TMenuItem;

VisualisarImpresso1: TMenuItem;

N1: TMenuItem;

N2: TMenuItem;

Sair1: TMenuItem;

Editar1: TMenuItem;

Recortar1: TMenuItem;

Copiar1: TMenuItem;

Colar1: TMenuItem;

EmbeddedWB1: TEmbeddedWB;

SaveDialog1: TSaveDialog;

OpenDialog1: TOpenDialog;

procedure ToolButton1Click(Sender: TObject);

procedure ToolButton2Click(Sender: TObject);

procedure ToolButton3Click(Sender: TObject);

procedure ToolButton4Click(Sender: TObject);

procedure ToolButton6Click(Sender: TObject);

procedure ToolButton7Click(Sender: TObject);

procedure FormCreate(Sender: TObject);

procedure NovaPagina1Click(Sender: TObject);

procedure SalvarComo1Click(Sender: TObject);

procedure Imprimir1Click(Sender: TObject);

procedure VisualisarImpresso1Click(Sender: TObject);

procedure Sair1Click(Sender: TObject);

procedure Copiar1Click(Sender: TObject);

procedure Colar1Click(Sender: TObject);

procedure Recortar1Click(Sender: TObject);

procedure KeyPress(Sender: TObject; var Key: Char);

procedure TheChange(ASender: TObject; const Text: WideString);

private

{ Private declarations }

public

{ Public declarations }

end;

 

var

Form1: TForm1;

 

implementation

 

{$R *.dfm}

 

procedure TForm1.ToolButton1Click(Sender: TObject);

begin

EmbeddedWB1.GoBack;

end;

 

procedure TForm1.ToolButton2Click(Sender: TObject);

begin

EmbeddedWB1.GoForward;

end;

 

procedure TForm1.ToolButton3Click(Sender: TObject);

begin

EmbeddedWB1.Stop;

end;

 

procedure TForm1.ToolButton4Click(Sender: TObject);

begin

EmbeddedWB1.Refresh;

end;

 

procedure TForm1.ToolButton6Click(Sender: TObject);

begin

EmbeddedWB1.GoSearch;

end;

 

procedure TForm1.ToolButton7Click(Sender: TObject);

begin

EmbeddedWB1.GoHome;

end;

 

procedure TForm1.FormCreate(Sender: TObject);

begin

EmbeddedWB1.GoHome;

end;

 

procedure TForm1.NovaPagina1Click(Sender: TObject);

begin

WinExec (pchar(application.ExeName),SW_Maximize);

end;

 

procedure TForm1.SalvarComo1Click(Sender: TObject);

begin

if SaveDialog1.Execute then

begin

EmbeddedWB1.SaveToFile(SaveDialog1.FileName);

end;

end;

procedure TForm1.Imprimir1Click(Sender: TObject);

begin

EmbeddedWB1.Print;

end;

 

procedure TForm1.VisualisarImpresso1Click(Sender: TObject);

begin

EmbeddedWB1.PrintPreview;

end;

 

procedure TForm1.Sair1Click(Sender: TObject);

begin

Application.Terminate;

end;

 

procedure TForm1.Copiar1Click(Sender: TObject);

begin

EmbeddedWB1.Copy;

end;

 

procedure TForm1.Colar1Click(Sender: TObject);

begin

EmbeddedWB1.Paste;

end;

 

procedure TForm1.Recortar1Click(Sender: TObject);

begin

EmbeddedWB1.Cut;

end;

procedure TForm1.KeyPress(Sender: TObject; var Key: Char);

begin

if (Key=#13) then

begin

EmbeddedWB1.Go(ComboboxEx1.Text);

 

end;

end;

 

procedure TForm1.TheChange(ASender: TObject; const Text: WideString);

begin

Form1.Caption := Text + ' - FaP '

end;

 

end.

 

ﾠﾠMural de Coleçõesﾠﾠ

Clique aqui e adquira suas medalhas
Link para o comentário
https://www.webcheats.com.br/topic/1610425-error-rlink32-too-many-resources-to-handle/
Compartilhar em outros sites
Davi Uzumaki Contribuidor

Davi Uzumaki 0

Postado
  • Contribuidor
Postado
Estava criando um navegador, quando terminei, que mandei executar para ver se estava tudo certinho, ele deu esse erro...

 

[Error]Error: RLINK32: Too Many Resources to handle

 

unit Unit1;

 

interface

 

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, ComCtrls, ImgList, ToolWin, OleCtrls, SHDocVw_EWB, EwbCore,

EmbeddedWB, Menus, StdCtrls;

 

type

TForm1 = class(TForm)

CoolBar1: TCoolBar;

ImageList1: TImageList;

ToolBar1: TToolBar;

ToolButton1: TToolButton;

ToolButton2: TToolButton;

ToolButton3: TToolButton;

ToolButton4: TToolButton;

ToolButton5: TToolButton;

ToolButton6: TToolButton;

ToolButton7: TToolButton;

ComboBoxEx1: TComboBoxEx;

MainMenu1: TMainMenu;

Arquivo1: TMenuItem;

NovaPagina1: TMenuItem;

SalvarComo1: TMenuItem;

Imprimir1: TMenuItem;

VisualisarImpresso1: TMenuItem;

N1: TMenuItem;

N2: TMenuItem;

Sair1: TMenuItem;

Editar1: TMenuItem;

Recortar1: TMenuItem;

Copiar1: TMenuItem;

Colar1: TMenuItem;

EmbeddedWB1: TEmbeddedWB;

SaveDialog1: TSaveDialog;

OpenDialog1: TOpenDialog;

procedure ToolButton1Click(Sender: TObject);

procedure ToolButton2Click(Sender: TObject);

procedure ToolButton3Click(Sender: TObject);

procedure ToolButton4Click(Sender: TObject);

procedure ToolButton6Click(Sender: TObject);

procedure ToolButton7Click(Sender: TObject);

procedure FormCreate(Sender: TObject);

procedure NovaPagina1Click(Sender: TObject);

procedure SalvarComo1Click(Sender: TObject);

procedure Imprimir1Click(Sender: TObject);

procedure VisualisarImpresso1Click(Sender: TObject);

procedure Sair1Click(Sender: TObject);

procedure Copiar1Click(Sender: TObject);

procedure Colar1Click(Sender: TObject);

procedure Recortar1Click(Sender: TObject);

procedure KeyPress(Sender: TObject; var Key: Char);

procedure TheChange(ASender: TObject; const Text: WideString);

private

{ Private declarations }

public

{ Public declarations }

end;

 

var

Form1: TForm1;

 

implementation

 

{$R *.dfm}

 

procedure TForm1.ToolButton1Click(Sender: TObject);

begin

EmbeddedWB1.GoBack;

end;

 

procedure TForm1.ToolButton2Click(Sender: TObject);

begin

EmbeddedWB1.GoForward;

end;

 

procedure TForm1.ToolButton3Click(Sender: TObject);

begin

EmbeddedWB1.Stop;

end;

 

procedure TForm1.ToolButton4Click(Sender: TObject);

begin

EmbeddedWB1.Refresh;

end;

 

procedure TForm1.ToolButton6Click(Sender: TObject);

begin

EmbeddedWB1.GoSearch;

end;

 

procedure TForm1.ToolButton7Click(Sender: TObject);

begin

EmbeddedWB1.GoHome;

end;

 

procedure TForm1.FormCreate(Sender: TObject);

begin

EmbeddedWB1.GoHome;

end;

 

procedure TForm1.NovaPagina1Click(Sender: TObject);

begin

WinExec (pchar(application.ExeName),SW_Maximize);

end;

 

procedure TForm1.SalvarComo1Click(Sender: TObject);

begin

if SaveDialog1.Execute then

begin

EmbeddedWB1.SaveToFile(SaveDialog1.FileName);

end;

end;

procedure TForm1.Imprimir1Click(Sender: TObject);

begin

EmbeddedWB1.Print;

end;

 

procedure TForm1.VisualisarImpresso1Click(Sender: TObject);

begin

EmbeddedWB1.PrintPreview;

end;

 

procedure TForm1.Sair1Click(Sender: TObject);

begin

Application.Terminate;

end;

 

procedure TForm1.Copiar1Click(Sender: TObject);

begin

EmbeddedWB1.Copy;

end;

 

procedure TForm1.Colar1Click(Sender: TObject);

begin

EmbeddedWB1.Paste;

end;

 

procedure TForm1.Recortar1Click(Sender: TObject);

begin

EmbeddedWB1.Cut;

end;

procedure TForm1.KeyPress(Sender: TObject; var Key: Char);

begin

if (Key=#13) then

begin

EmbeddedWB1.Go(ComboboxEx1.Text);

 

end;

end;

 

procedure TForm1.TheChange(ASender: TObject; const Text: WideString);

begin

Form1.Caption := Text + ' - FaP '

end;

 

end.

 

Alguem ai?

ﾠﾠMural de Coleçõesﾠﾠ

Clique aqui e adquira suas medalhas
Link para o comentário
https://www.webcheats.com.br/topic/1610425-error-rlink32-too-many-resources-to-handle/#findComment-6933211
Compartilhar em outros sites
Participativo

NoSlake 56

Postado
  • Participativo
Postado

 

unit Unit1;

 

interface

 

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, ComCtrls, ImgList, ToolWin, OleCtrls, SHDocVw_EWB, EwbCore,

EmbeddedWB, Menus, StdCtrls;

 

type

TForm1 = class(TForm)

CoolBar1: TCoolBar;

ImageList1: TImageList;

ToolBar1: TToolBar;

ToolButton1: TToolButton;

ToolButton2: TToolButton;

ToolButton3: TToolButton;

ToolButton4: TToolButton;

ToolButton5: TToolButton;

ToolButton6: TToolButton;

ToolButton7: TToolButton;

ComboBoxEx1: TComboBoxEx;

MainMenu1: TMainMenu;

Arquivo1: TMenuItem;

NovaPagina1: TMenuItem;

SalvarComo1: TMenuItem;

Imprimir1: TMenuItem;

VisualisarImpresso1: TMenuItem;

N1: TMenuItem;

N2: TMenuItem;

Sair1: TMenuItem;

Editar1: TMenuItem;

Recortar1: TMenuItem;

Copiar1: TMenuItem;

Colar1: TMenuItem;

EmbeddedWB1: TEmbeddedWB;

SaveDialog1: TSaveDialog;

OpenDialog1: TOpenDialog;

procedure ToolButton1Click(Sender: TObject);

procedure ToolButton2Click(Sender: TObject);

procedure ToolButton3Click(Sender: TObject);

procedure ToolButton4Click(Sender: TObject);

procedure ToolButton6Click(Sender: TObject);

procedure ToolButton7Click(Sender: TObject);

procedure FormCreate(Sender: TObject);

procedure NovaPagina1Click(Sender: TObject);

procedure SalvarComo1Click(Sender: TObject);

procedure Imprimir1Click(Sender: TObject);

procedure VisualisarImpresso1Click(Sender: TObject);

procedure Sair1Click(Sender: TObject);

procedure Copiar1Click(Sender: TObject);

procedure Colar1Click(Sender: TObject);

procedure Recortar1Click(Sender: TObject);

procedure KeyPress(Sender: TObject; var Key: Char);

procedure TheChange(ASender: TObject; const Text: WideString);

private

{ Private declarations }

public

{ Public declarations }

end;

 

var

Form1: TForm1;

 

implementation

 

{$R *.dfm}

 

procedure TForm1.ToolButton1Click(Sender: TObject);

begin

EmbeddedWB1.GoBack;

end;

 

procedure TForm1.ToolButton2Click(Sender: TObject);

begin

EmbeddedWB1.GoForward;

end;

 

procedure TForm1.ToolButton3Click(Sender: TObject);

begin

EmbeddedWB1.Stop;

end;

 

procedure TForm1.ToolButton4Click(Sender: TObject);

begin

EmbeddedWB1.Refresh;

end;

 

procedure TForm1.ToolButton6Click(Sender: TObject);

begin

EmbeddedWB1.GoSearch;

end;

 

procedure TForm1.ToolButton7Click(Sender: TObject);

begin

EmbeddedWB1.GoHome;

end;

 

procedure TForm1.FormCreate(Sender: TObject);

begin

EmbeddedWB1.GoHome;

end;

 

procedure TForm1.NovaPagina1Click(Sender: TObject);

begin

WinExec (pchar(application.ExeName),SW_Maximize);

end;

 

procedure TForm1.SalvarComo1Click(Sender: TObject);

begin

if SaveDialog1.Execute then

begin

EmbeddedWB1.SaveToFile(SaveDialog1.FileName);

end;

end;

 

procedure TForm1.Imprimir1Click(Sender: TObject);

begin

EmbeddedWB1.Print;

end;

 

procedure TForm1.VisualisarImpresso1Click(Sender: TObject);

begin

EmbeddedWB1.PrintPreview;

end;

 

procedure TForm1.Sair1Click(Sender: TObject);

begin

Application.Terminate;

end;

 

procedure TForm1.Copiar1Click(Sender: TObject);

begin

EmbeddedWB1.Copy;

end;

 

procedure TForm1.Colar1Click(Sender: TObject);

begin

EmbeddedWB1.Paste;

end;

 

procedure TForm1.Recortar1Click(Sender: TObject);

begin

EmbeddedWB1.Cut;

end;

 

procedure TForm1.KeyPress(Sender: TObject; var Key: Char);

begin

if (Key=#13) then

begin

EmbeddedWB1.Go(ComboboxEx1.Text);

 

end;

end;

 

procedure TForm1.TheChange(ASender: TObject; const Text: WideString);

begin

Form1.Caption := Text + ' - FaP '

end;

 

end.

 

 

Resolve?

Se não, me passa as linhas em que está o erro.

Membro - Bronze - Geek - Bronze - Tech - Mod - Coord - Co-Admin - Platinum

ﾠﾠMural de Coleçõesﾠﾠ

Clique aqui e adquira suas medalhas
Link para o comentário
https://www.webcheats.com.br/topic/1610425-error-rlink32-too-many-resources-to-handle/#findComment-6936117
Compartilhar em outros sites
Davi Uzumaki Contribuidor

Davi Uzumaki 0

Postado
  • Contribuidor
Postado

O erro, não é dado na linha. [Error] Error: RLINK32: Too many resources to handle.

 

Sem%2520t%25C3%25ADtulo.jpg

ﾠﾠMural de Coleçõesﾠﾠ

Clique aqui e adquira suas medalhas
Link para o comentário
https://www.webcheats.com.br/topic/1610425-error-rlink32-too-many-resources-to-handle/#findComment-6940866
Compartilhar em outros sites
Participativo

NoSlake 56

Postado
  • Participativo
Postado
O erro, não é dado na linha. [Error] Error: RLINK32: Too many resources to handle.

 

Sem%2520t%25C3%25ADtulo.jpg

 

Veja a última procedure da code:

É necessário se cadastrar para acessar o conteúdo.

 

A função não existe. Apague essa última procedure ai, e depois re-compile. Vai dar um erro numa linha, apague-a e compile novamente (F9), se der certo avisa, o erro é no seu componente Embedded (nada de mais só a procedure mesmo, apaga essa aí depois seleciona o EmbeddedWB e em OnTitleChange (evento) você recoloca isso:

É necessário se cadastrar para acessar o conteúdo.

 

 

Resolve?

Membro - Bronze - Geek - Bronze - Tech - Mod - Coord - Co-Admin - Platinum

ﾠﾠMural de Coleçõesﾠﾠ

Clique aqui e adquira suas medalhas
Link para o comentário
https://www.webcheats.com.br/topic/1610425-error-rlink32-too-many-resources-to-handle/#findComment-6943192
Compartilhar em outros sites
Davi Uzumaki Contribuidor

Davi Uzumaki 0

Postado
  • Contribuidor
Postado

Por algum motivo eu acho que o problema não estava na procedure, mas mudei, e continuou, até removendo as procedure ele manteve o erro RLINK32, procurando no google, achei que tinha sido o icone, mesmo voltando pra do próprio programa, o erro persiste, será que a re-instalação pode resolver???

 

 

 

--@Edit--

 

Então, re-instalação não funcionou

 

 

Project...

 

Scan:

[sCAN]

É necessário se cadastrar para acessar o conteúdo.
[/sCAN]

Download:

[DOWN]

É necessário se cadastrar para acessar o conteúdo.
[/DOWN]

 

ﾠﾠMural de Coleçõesﾠﾠ

Clique aqui e adquira suas medalhas
Link para o comentário
https://www.webcheats.com.br/topic/1610425-error-rlink32-too-many-resources-to-handle/#findComment-6943861
Compartilhar em outros sites
Participativo

NoSlake 56

Postado
  • Participativo
Postado
Por algum motivo eu acho que o problema não estava na procedure, mas mudei, e continuou, até removendo as procedure ele manteve o erro RLINK32, procurando no google, achei que tinha sido o icone, mesmo voltando pra do próprio programa, o erro persiste, será que a re-instalação pode resolver???

 

 

 

--@Edit--

 

Então, re-instalação não funcionou

 

 

Project...

 

Scan:

[sCAN]

É necessário se cadastrar para acessar o conteúdo.
[/sCAN]

Download:

[DOWN]

É necessário se cadastrar para acessar o conteúdo.
[/DOWN]

 

Baixei e compilei deu certo aqui ;s

Tente baixar a Dll RLINK32.dll e reinstala-la para tentar corrigir o erro.

Essa aí deve estar desatualizada (no caso eu uso a do Delphi 2010).

Membro - Bronze - Geek - Bronze - Tech - Mod - Coord - Co-Admin - Platinum

ﾠﾠMural de Coleçõesﾠﾠ

Clique aqui e adquira suas medalhas
Link para o comentário
https://www.webcheats.com.br/topic/1610425-error-rlink32-too-many-resources-to-handle/#findComment-6955663
Compartilhar em outros sites
Este tópico está impedido de receber novos posts.
 Compartilhar
Ir para a lista de tópicos
×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.