⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 tntextactns.pas

📁 TNT Components Source
💻 PAS
📖 第 1 页 / 共 3 页
字号:
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntPreviousTab.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntPreviousTab.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntPreviousTab.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntPreviousTab.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntNextTab }

procedure TTntNextTab.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntNextTab.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntNextTab.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntNextTab.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntNextTab.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntNextTab.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntOpenPicture }

procedure TTntOpenPicture.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntOpenPicture.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntOpenPicture.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntOpenPicture.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntOpenPicture.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntOpenPicture.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntSavePicture }

procedure TTntSavePicture.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntSavePicture.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntSavePicture.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntSavePicture.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntSavePicture.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntSavePicture.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntURLAction }

procedure TTntURLAction.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntURLAction.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntURLAction.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntURLAction.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntURLAction.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntURLAction.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntBrowseURL }

procedure TTntBrowseURL.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntBrowseURL.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntBrowseURL.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntBrowseURL.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntBrowseURL.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntBrowseURL.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntDownLoadURL }

procedure TTntDownLoadURL.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntDownLoadURL.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntDownLoadURL.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntDownLoadURL.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntDownLoadURL.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntDownLoadURL.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntSendMail }

procedure TTntSendMail.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntSendMail.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntSendMail.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntSendMail.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntSendMail.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntSendMail.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntListControlAction }

procedure TTntListControlAction.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntListControlAction.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntListControlAction.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntListControlAction.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntListControlAction.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntListControlAction.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntListControlCopySelection }

procedure TTntListControlCopySelection.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntListControlCopySelection.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntListControlCopySelection.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntListControlCopySelection.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntListControlCopySelection.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntListControlCopySelection.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntListControlDeleteSelection }

procedure TTntListControlDeleteSelection.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntListControlDeleteSelection.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntListControlDeleteSelection.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntListControlDeleteSelection.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntListControlDeleteSelection.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntListControlDeleteSelection.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntListControlSelectAll }

procedure TTntListControlSelectAll.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntListControlSelectAll.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntListControlSelectAll.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntListControlSelectAll.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntListControlSelectAll.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntListControlSelectAll.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntListControlClearSelection }

procedure TTntListControlClearSelection.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntListControlClearSelection.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntListControlClearSelection.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntListControlClearSelection.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntListControlClearSelection.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntListControlClearSelection.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

{ TTntListControlMoveSelection }

procedure TTntListControlMoveSelection.Assign(Source: TPersistent);
begin
  inherited;
  TntExtActn_AfterInherited_Assign(Self, Source);
end;

procedure TTntListControlMoveSelection.DefineProperties(Filer: TFiler);
begin
  inherited;
  TntPersistent_AfterInherited_DefineProperties(Filer, Self);
end;

function TTntListControlMoveSelection.GetCaption: WideString;
begin
  Result := TntAction_GetCaption(Self);
end;

procedure TTntListControlMoveSelection.SetCaption(const Value: WideString);
begin
  TntAction_SetCaption(Self, Value);
end;

function TTntListControlMoveSelection.GetHint: WideString;
begin
  Result := TntAction_GetHint(Self);
end;

procedure TTntListControlMoveSelection.SetHint(const Value: WideString);
begin
  TntAction_SetHint(Self, Value);
end;

end.

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -