- 2024-08-26notification ant插件 封装notification 防止多个相同的错误提示同时展示 message也一样
import{notification}from'ant-design-vue'typeNoticeType='info'|'success'|'error'|'warning'//保证notification提示不重复constmessageSet=newSet();letclearTimer:number|undefined;interf
- 2024-06-15实例方法与静态方法
实例方法(非静态方法)定义:实例方法是与类的实例(对象)相关联的方法。它们可以访问类的实例变量(非静态变量),也可以访问类的静态变量和方法。访问:实例方法必须通过类的实例(对象)来调用。例如,如果你有一个名为MyClass的类和一个名为myMethod的实例方法,那么你需要先创建一个MyClass的
- 2024-02-27delphi 提高unigui开发效率的两个方法
1、编译时自己退出运行的程序。在做unigui开发时,每次编译运行时,unigui的应用都会在后台运行,每次重新编译时都必须手工在任务栏里将应用退出才行,非常麻烦,可以在项目编译的参数里加上杀进程的命令,这样每次重新编译时就会自动将旧的进程杀掉。命令参数如下:taskkill/f/im$(OUTPUT
- 2023-09-19BCB-消息处理方式
一、重新实现WndProc,注意名称要一致,查看继承链会发现WndProc是一个虚函数。void__fastcallTForm1::WndProc(TMessage&message){TForm::WndProc(message);if(message.Msg==WM_CHAR)ShowMessage(message.WParam);}二、添加消息映射protected:BEGIN_M
- 2023-09-05Element UI实现每次只弹出一个Message消息提示
前言在开发Web应用程序时,我们经常需要使用消息提示来向用户展示重要信息。ElementUI提供了一个方便易用的组件——Message,可以用于显示各种类型的消息提示。然而,默认情况下,当多个消息提示同时触发时,它们会依次累积在页面上,导致界面上出现多个消息提示。本篇博客将介绍如何通过对
- 2023-08-31Tlist_Demo
typeTSmt=recordSName:string[16];Feeder:Integer;Dushu:Real;end;Psmt=^TSmt;varList:TList;//List:Tlist<Psmt>;泛型指针TlistusesGenerics.Collections;procedureTForm2.Button1Click(Sender:TObject);varbuf:Ps
- 2023-08-31分离包含空格字符串[xe & D7]
xevars:string;sList:TStringList;begins:='aaa,bbb,ccc,dddd,eee';sList:=TStringList.Create;sList.StrictDelimiter:=True;//Delph7无此属性sList.Delimiter:=',';sList.DelimitedText:=s;ShowMessage(sList.Tex
- 2023-08-30TStringList 常用方法与属性
TStringList常用方法与属性:2var3List:TStringList;4i:Integer;5begin6List:=TStringList.Create;7List.Add('Strings1');{添加}8List.Add('Strings2');9List.Exchange(0,1);{置换}10List.Insert(0
- 2023-08-19Delphi获取文件创建时间、文件最后修改时间
procedureTForm1.Button1Click(Sender:TObject);//获取文件创建时间varFileName:string;ti:Integer;dt:TDateTime;beginFileName:='D:\test\Test.txt';ti:=FileAge(FileName);ShowMessage(IntToStr(ti));//返回:1030115371,需要转换dt:=F
- 2023-08-07Delphi ShellExecute为应用程序传递多个参数
开发环境DelphiXe11.3 调用的程序 procedureTForm2.Button1Click(Sender:TObject);begin//某个参数包含空格时(用""),如下面这行;这里传递过去是3个参数ShellExecute(handle,'open',pchar('C:\Users\PC\Desktop\新建文件夹\新建文件夹\Win32\Debug\Project2.ex
- 2023-06-19使用Kotlin+Rretrofit+rxjava+设计模式+MVP封装网络请求
0、前言:kotlin使用起来非常顺畅,尤其是结合rxjava、设计模式使用,你会发现写代码原来可以这么开心!什么?你还在使用java?赶紧去学一下kotlin吧!我相信你一定会对他爱不释手,kotlin也很容易学,花一天的时间就可以从java切换为kotlin一、正文本文主要介绍如何使用kotlin封装网络请求的工具,结
- 2023-06-01vue+element项目中统一处理接口异常,只提示一次异常信息
有时候一个页面会同时调多个接口,但是多个接口异常,需要做提示,那么提示的时候会弹出很多的提示信息,这无疑让体验感降低很多。 所以针对这种情况,我们配合elementUI统一做一个异常状态的处理,只能显示一次提示的功能,后续代码调接口的时候也可以省略去写异常状态下的逻辑了。首先
- 2023-05-13注册系统级热键
unitUnit1;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs;type TForm1=class(TForm) procedureFormCreate(Sender:TObject); procedureFormDestroy(Sender:TObject); private p
- 2023-05-12Delphi 字符串拆分/分割[1] - TStringList
1、TStringList默认以','拆分字符onstconstr:String='aaa,bbb,ccc,ddd';varstrs:TStrings;i:Integer;beginstrs:=TStringList.Create;strs.CommaText:=constr;fori:=0toStrs.Count-1doShowMessage(Strs[i]);//aaabbbcccd
- 2023-05-08C# 聊天室(基于TCP协议)
客户端和服务端客户端usingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Linq;usingSystem.Net;usingSystem.Net.Sockets;usingSystem.Text;usingSystem.Threading.Tasks;using
- 2023-03-21前端设计模式——状态模式
状态模式(StatePattern):将对象的行为和状态分离,使得对象可以根据不同的状态来改变自己的行为。在前端开发中,可以使用状态模式来管理页面的状态和响应用户的交互。在状态模
- 2023-02-15复合数据类型
(1)枚举类型定义:type枚举类型标识符=(标识符1,标识符2,…,标识符n)枚举元素只能是标识符;定义枚举类型时列出的所有枚举元素构成了这种枚举类型的值域(取值范围)。例如
- 2023-01-20socket端口数据转发
---------------------------------------------------------------------------先说下我的需求:因工作的需要,别的电脑在访问我的电脑的80端口时,我希望其访问的其实是某台设
- 2023-01-14格式化数字字符串输出的一个小技巧
我这里分别以VC和Delphi举例:比如想生成000005,000255这样的字符串先看VC的: inti=5; CStringstrOut; strOut.Format("%.6d",i); AfxMessageBox(strOut); i=25
- 2022-12-31Vue 组件的创建、使用
Vue组件(Vuecomponent)Vue组件的位置在Vue项目中可以看到一类新的文件后缀.vue用来表示Vue文件。需要区分在项目目录src下的App.vue和src\components的
- 2022-08-22普通插槽
父组件:<template><divclass="app"><!--1.内容是button--><show-messagetitle="哈哈哈"><button>我是按钮元素</button></show-message