cz_012273-优快云博客

原创 Delphi FMX的Webbrowser控件中运行JavaScript代码（带歌词的音乐播放器）

最近一段，想做一个能显示歌词的音乐播放器，本打算用Delphi实现，但恰好本人之前在Delphi FMX下编写了一个html编辑调试的app模块，就想试试能不能用Javascript代码来达到这样一个目的。按老规矩，先上网搜了一圈，看有没有现成的代码可以用来修改的。结果发现，音乐播放器的代码倒是不少（javascript的资源可比delphi丰富多了），但是能读取本地歌词文件的却不多，仅有的几个复制过来在手机的Webbrowser中试了一下，也都无法运行。经过查阅资料、多方求索了解到，原来读取本地文件的操

2021-12-13 14:44:46 1071

原创解决Memo控件选择文本时屏幕滚动

一个小问题却困扰了我很长时间：Delphi FMX下用memo控件编写的文本编辑器在选择文本时，屏幕上下滚动，导致选择操作很难进行。而手机输入法自带的编辑选择功能，在自己定制的编辑器中却不起作用（输入法接口函数找不到）。尤其在修改一些源程序代码时，复制、粘贴起来简直令人恼火。经过不断摸索，现在终于算是解决了！方法如下：在memo的mousemove事件中，当选择文本的长度大于0小于50时，禁止滚动；当选择文本长度大于50，允许滚动，这样屏幕上滑后可继续拖动选择文本。在mouseleave事件中，当选择

2021-12-08 11:22:52 913

原创解决Delphi FMX Webbrowser控件无法释放

在我的delphi工具箱项目中，之前已经实现了文本文件的编辑功能，经过简单修改后，可以打开HTML文件。这时突然有了一个新的想法：能不能用delphi的文本编辑器实现HTML文件编辑调试功能呢？说干就干，一开始的想法是想用delphi调用外部浏览器打开HTML文件，可是经过试验，华为安卓的默认浏览器不能打开本地HTML文件（输入file://文件路径+文件名后直接进入搜索功能），调用其他浏览器又感觉太过臃肿。这是想到了用Delphi自带的webbrowser控件，由于是临时调用，用完后关闭，所以选择了动

2021-11-19 12:41:41 649

原创记不住git命令？好办，用批处理

作为一名编程爱好者，经常要用到代码管理、版本控制的工具——git，而git命令涉及到的语法参数又比较多，如果不小心用错了，还有可能导致辛辛苦苦编好的代码一瞬间付之东流。为了避免这种情况的发生，同时减轻记忆负担，我参考网上的文章，结合自身需要，把常用的git命令编成一个批处理文件放在桌面上，需要用的时候直接双击执行就可以了。当然，在这之前，需要在系统中安装好git，并配置好环境变量。@echo offrem 选择要操作的git项目并进入对应目录echo.echo =================

2021-10-31 16:03:43 342

原创 Delphi FMX下移动界面布局问题

Delphi FMX下移动界面布局问题为了让delphi编写的APP适应不同尺寸的手机屏幕，需要在界面布局上采取一些办法。 Delphi XE 10.4 默认的安卓view界面只有4寸、5寸、7寸等固定几种，无法自行设置，这就导致设计好的手机APP界面，在真机调试时超出或不满屏幕。针对这一问题，网上给出最简单的解决方法，是采用一个scaledlayout组件，把所有要显示的东西放进去，里面的控件就会随着屏幕大小自动缩放。但这种方法有一个缺陷，那就是不仅控件会缩放，里面的文字也会随着缩放，最终显示效

2021-10-30 07:31:37 964

原创 Delphi FMX 长按按钮删除文件

Delphi FMX 长按按钮删除文件在按钮mousedown事件中取当前毫秒数，赋给全局变量，在mouseup事件中再取一次，当二者之差超过某一阈值（设定为2000，即2秒）时，删除文件，如不超过，则显示长按删除信息。代码如下：...

2021-10-24 19:18:14 338

原创 DelphiFMX安卓下自动选择光标所在行文本

在memo控件中，想实现自动选择当前行文本功能，本以为应该比较简单，网上一查，确实有这样一段程序，代码如下：procedure SelectMemoLine(Memo : TCustomMemo) ;varLine : integer;beginwith Memo dobeginLine := Perform(EM_LINEFROMCHAR, SelStart, 0) ;SelStart := Perform(EM_LINEINDEX, Line, 0) ;SelLength := L

2021-10-23 09:17:11 455

原创 Delphi自带git版本控制工具的使用

刚开始，为了保存自己的程序代码，每次编写完成后，将代码保存到网盘。但随着程序的逐渐加大，百度网盘的速度越来越不能满足需要（为了图省事，采用的是整个文件夹上传的方式，上传速度还可以，下载限速却让人不得不吐槽）。后来从网上了解到，有一类专门提供代码存储空间的网站，如github、gitee，采用的是分布式版本控制系统，方便高效，特别适合编程者使用。说干就干，按照网上找来的教程，先是下载安装了git，几番周折，终于完成了配置ssh公钥等一系列步骤。在搜索学习过程中，得知Delphi本身带有git版本控制工具，

2021-10-17 17:19:33 975

原创最简单的方法就是最好的方法

最简单的方法就是最好的方法----DelphiXE编程体会之二最近，用Delphi做了一个自动识别文本编码的模块，其中一段代码是把word类型的数据高低位字节互换，然后与数组中的编码标志进行对照。本着拿来主义的原则，将网上的代码全盘复制，却发现其中有一段嵌入式汇编，在FMX安卓模式下无法编译通过，网上多番搜索无果后，只好在群里向网友求助。经过网友指点，将代码改为位操作语句，编译是通过了，但结果却不正确。临时抱佛脚，学习了一些位操作和数据类型相关知识后，仍然是一头雾水。几番试验仍无法达到预期的结果。这时忽

2021-10-06 20:15:33 204

原创 DelphiXE10.4安卓编程初学者心得

1.真机调试真的很方便。出于对自己手机变板砖的担心，一开始找了个模拟器（NOX夜神），安上一看，最高只支持到安卓7版本，用不上。一狠心，一咬牙，干脆用真机调试！说起来挺惭愧的，如果不是通过学习安卓编程，我都不知道安卓手机的开发者模式怎么进入：设置“关于手机”——连点7次版本号——返回“系统和更新”——开发人员选项。经过试验，我是连续选择以下几个选项：“仅充电”模式下允许ADB调试——连接USB时总是弹出提示——USB调试，期间弹出几个对话框，点击“确定”就可以了。在打开DelphiXE10工...

2021-09-29 13:43:22 2177

原创从一个编程老菜鸟来看Delphi的优点

Delphi这门编程语言曾经有过辉煌的日子，以其语法规则简便易学、编译代码快速高效而著称。但随着时光的流转，慢慢被各种后起之秀（如Java、Python、Go等语言）所赶超，以至于谈起Delphi便有一种昨日黄花之感。作为一名接触编程时间不短、但水平不高的“老菜鸟”，我对Delphi的认识却刚刚开始。最开始学编程是从DOS下的BASIC语言（确切地说是解释型的QBASIC）入门，简单的几个语句，就可以上机操作，让计算机跟随自己的指令做出相应的反映，那种成就...

2021-09-27 19:45:54 2923

cz_012273的博客