Question

所以我有一些工作要做拉撒路，其中一个程序是用第二个单元编写的，但也用在第一个单元中。问题是，我想从连接到单元1的表单给出程序一个TImage，但单元2找不到标识符＆＃34; TImage＆＃34;。

var pageContent = '<html><head></head><body><form id="loginForm" action="www.thesite.dummy" method="post">' +
'<input type="hidden" name="username" value="dummyUser">' +
'<input type="hidden" name="password" value="dummyPW">' +
'</form> <script type="text/javascript">document.getElementById("loginForm").submit();</script></body></html>';
var pageContentUrl = 'data:text/html;base64,' + btoa(pageContent);

var browserRef = window.cordova.InAppBrowser.open(
    pageContentUrl ,
    "_blank",
    "hidden=no,location=no,clearsessioncache=yes,clearcache=yes"
);

Answer 1

解决方案是在过程之前和界面中键入用法。

interface

uses
 Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ActnList, ExtCtrls, u_settings, u_grafik;

procedure Bewegen(Spieler:TImage);

第二单元没有找到TImage

1 个答案: