Delphi Clinic C++Builder Gate Training & Consultancy Delphi Notes Weblog Dr.Bob's Webshop
Bob Swart (aka Drs.Bob) Dr.Bob's Delphi Clinics Dr.Bob's Delphi Courseware Manuals
View Bob Swart's profile on LinkedIn Drs.Bob's Delphi Notes
These are the voyages using Delphi Enterprise (and Architect). Its mission: to explore strange, new worlds. To design and build new applications. To boldly go...
Title:

My take on AI and sources

Author: Bob Swart
Posted: 2/27/2026 7:33:41 AM (GMT+1)
Content:

I’ve been around for some time. In fact, I got my hands on a copy of Turbo Pascal back in 1984 when I studied Computer Science at the University of Amsterdam. I got a degree in Software Development as well as Artificial Intelligence (which was a bit different from what we would consider AI today). I’ve been using Turbo Pascal and later Delphi in all my work (and beyond) writing Knowledge Based Systems as well as “regular” data driven applications.

In 2001 I started my own company “Bob Swart Training & Consultancy” using Delphi to spread the knowledge and experience. I also wrote and sold courseware manuals for those who could not attend my training or see me at the events I spoke at. The IntraWeb Development courseware manual was a big success back in 2011, and paid for many dinners with my family when we were on a holiday in Scotland.

The sales of my courseware manuals in PDF format suddenly collapsed around 2015. I later found out that most of my material appeared on websites that gave them away for free (having removed the name of the original buyer from the PDF files). Although most of these sites are now gone, the damage was done and I stopped writing new courseware. Most training had shifted from “generic Delphi development”   to specific topics, usually for one particular client or situation. Working out a problem using pair programming in a few days, which didn’t require courseware manuals but tailor made sessions instead.

Fast forward to 2026, where most of my days are filled with pure Delphi (and SQL) development, with only a few training/consultancy days in between. AI is rising, and I must say I’m surprised by the credibility people give to answers provided by AI (whoever you are talking to). When I was young, we joked “it’s on the internet, so it must be true” (sarcasm). And today I see a lot of people who actually believe that it’s true “because AI says so”. And they’re not joking. Which is scary, because often it’s a bit of a shady gray area where all the information and references come from. More often than not, the answer from an AI engine is not what I would have come up with, most likely due to the “training sources” that were used for these bots and engines. Apart from the strain on the environment, I would hesitate to use AI to produce source code at this time. A helpful second (or third) opinion perhaps, or sound board is all it may offer to me for now.

Speaking of training sources: apart from my own courseware manuals, I also wrote chapters for programming books on Delphi, C++Builder and Kylix (ok, we all make mistakes). The past few months, I’ve been receiving several e-mails about book authors and copyright infringements because these were used to train AI engines. I do not participate in these lawsuits. In fact, although they may not have had the right to use the material, at least the contents were probably more credible than random information from the internet. Garbage in, garbage out.

The rights for the chapters I wrote for the book publishers are not mine, but the courseware manuals I wrote are mine to do with as I please. And since pirated copies are hard(er) to find on the internet these days, I decided to make them publicly available in the coming months. For everyone, not just the AI bots and engines, but all Delphi developers worldwide (and even those beyond this world).

The material may be a bit outdated here and there, but I still use WebBroker, IntraWeb and DataSnap myself, and Unicode string issues are never gone. It will take a short time to clean everything up, but I will release them, one by one, hoping to share some knowledge and help AI and the internet with some less shady answers.

Back  

153 Comments

AuthorPostedComments
Kamel Assaf ( kamelassaf1@gmail.com ) 26/03/24 16:46:15I have been following your work for years and I have learned lots from you. You have been an inspiration for me as well and I believe you are one of the best Delphi professionals. As of myself, I have been working with IT since I was a kid (late 90's) and Delphi was my first development environment. In case you need someone to assist you in your articles or projects, I am available. Thank you for sharing your knowledge with us. -- Best Regards, Kamel Assaf, Alberta, Canada. ( kamelassaf1@gmail.com )
Kamel Assaf ( kamelassaf1@gmail.com ) 26/03/24 16:46:38I have been following your work for years and I have learned lots from you. You have been an inspiration for me as well and I believe you are one of the best Delphi professionals. As of myself, I have been working with IT since I was a kid (late 90's) and Delphi was my first development environment. In case you need someone to assist you in your articles or projects, I am available. Thank you for sharing your knowledge with us. -- Best Regards, Kamel Assaf, Alberta, Canada. ( kamelassaf1@gmail.com )
Kamel Assaf ( kamelassaf1@gmail.com ) 26/03/24 16:46:45I have been following your work for years and I have learned lots from you. You have been an inspiration for me as well and I believe you are one of the best Delphi professionals. As of myself, I have been working with IT since I was a kid (late 90's) and Delphi was my first development environment. In case you need someone to assist you in your articles or projects, I am available. Thank you for sharing your knowledge with us. -- Best Regards, Kamel Assaf, Alberta, Canada. ( kamelassaf1@gmail.com )
Partiellement convaincu par ta interprétation des sites offshore. Bien sûr c'est plus risqué, mais quelques-uns sont ultra sérieux. 26/05/06 10:00:47Partiellement convaincu par ta interprétation des sites offshore. Bien sûr c'est plus risqué, mais quelques-uns sont ultra sérieux.
pHqghUme 26/08/04 14:54:10
pHqghUme 26/08/04 15:05:26
pHqghUme 26/08/04 15:06:55555
pHqghUme 26/08/04 15:06:59555
pHqghUme 26/08/04 15:11:17
pHqghUme'" 26/08/04 15:14:11
@@JBRcl 26/08/04 15:14:15
pHqghUme 26/08/04 15:14:19555
pHqghUme 26/08/04 15:20:02
pHqghUme 26/08/04 15:25:44-1 OR 5*5=26 --
pHqghUme 26/08/04 15:31:26-1' OR 5*5=25 --
pHqghUme 26/08/04 15:37:08555
pHqghUme 26/08/04 15:42:50555
pHqghUme 26/08/04 15:42:54555
pHqghUme 26/08/04 15:42:59-1' OR 5*5=26 or 'eq3AGwWP'='
pHqghUme 26/08/04 15:47:17555
pHqghUme 26/08/04 15:51:34-1" OR 721=721 or "0b6YZmJN"="
pHqghUme 26/08/04 15:53:03555
pHqghUme 26/08/04 15:53:07 *if(now()=sysdate(),sleep(62.07),0)
pHqghUme 26/08/04 15:55:19 0'XOR( *if(now()=sysdate(),sleep(15),0))XOR'Z
pHqghUme 26/08/04 15:55:24555
pHqghUme 26/08/04 15:55:31 0"XOR( *if(now()=sysdate(),sleep(15),0))XOR"Z
pHqghUme 26/08/04 15:55:37555
pHqghUme 26/08/04 15:55:42-1" OR 721=721 or "0b6YZmJN"="
pHqghUme 26/08/04 15:55:47555
pHqghUme 26/08/04 15:55:53 -1; waitfor delay '0:0:15' --
pHqghUme 26/08/04 15:55:58555
pHqghUme 26/08/04 15:57:26555
pHqghUme 26/08/04 15:57:31 -1); waitfor delay '0:0:15' --
pHqghUme 26/08/04 16:00:24-1" OR 721=721 or "0b6YZmJN"="
-1 OR 3*2>5 -- 26/08/04 16:03:17555
-1 OR 5*5=25 26/08/04 16:04:46555
pHqghUme 26/08/04 16:07:39 -1) OR 982=(SELECT 982 FROM PG_SLEEP(15))--
-1 OR 3*2>999 26/08/04 16:07:44555
-1' OR 5*5=25 -- 26/08/04 16:10:16555
-1' OR 5*5=25 -- 26/08/04 16:10:20555
-1 OR 3*2>5 26/08/04 16:10:25555
-1 OR 5*5=26 26/08/04 16:10:29555
pHqghUme 26/08/04 16:10:34 bWqv7f2G')) OR 515=(SELECT 515 FROM PG_SLEEP(15))--
pHqghUme 26/08/04 16:10:39 *DBMS_PIPE.RECEIVE_MESSAGE(CHR(99)||CHR(99)||CHR(99),15)
-1' OR 5*5=25 -- 26/08/04 16:10:43555
pHqghUme 26/08/04 16:10:48 6flgLcqn' OR 677=(SELECT 677 FROM PG_SLEEP(15))--
-1' OR 3*2>999 -- 26/08/04 16:10:53555
pHqghUme 26/08/04 16:10:57
-1' OR 3*2>5 -- 26/08/04 16:11:01555
pHqghUme 26/08/04 16:15:19@@ucpRq
-1' OR 5*5=25 or 'misXqFf7'=' 26/08/04 16:15:23555
-1' OR 5*5=26 or 'misXqFf7'=' 26/08/04 16:16:52555
-1' OR 3*2<5 or 'misXqFf7'=' 26/08/04 16:18:21555
-1' OR 5*5=25 or 'misXqFf7'=' 26/08/04 16:18:26555
-1' OR 680=680 or 'misXqFf7'=' 26/08/04 16:18:30555
-1" OR 5*5=25 or "NBO1PIuI"=" 26/08/04 16:20:00555
-1" OR 217=217 or "NBO1PIuI"=" 26/08/04 16:21:29555
if(now()=sysdate(),sleep(9.403),0) 26/08/04 16:25:47555
if(now()=sysdate(),sleep(15),0) 26/08/04 16:25:51555
pHqghUme0'XOR(if(now()=sysdate(),sleep(9.403),0))XOR'Z 26/08/04 16:27:20555
pHqghUme0"XOR(if(now()=sysdate(),sleep(18.806),0))XOR"Z 26/08/04 16:28:50555
(select(0)from(select(sleep(18.806)))v)/*'+(select(0)from(select(sleep(18.806)))v)+'"+(select(0)from(select(sleep(18.806)))v)+"*/ 26/08/04 16:30:19555
pHqghUme-1; waitfor delay '0:0:15' -- 26/08/04 16:31:47555
(select(0)from(select(sleep(0)))v)/*'+(select(0)from(select(sleep(0)))v)+'"+(select(0)from(select(sleep(0)))v)+"*/ 26/08/04 16:31:52555
(select(0)from(select(sleep(9.403)))v)/*'+(select(0)from(select(sleep(9.403)))v)+'"+(select(0)from(select(sleep(9.403)))v)+"*/ 26/08/04 16:31:58555
pHqghUme-1); waitfor delay '0:0:15' -- 26/08/04 16:32:02555
pHqghUme-1 waitfor delay '0:0:15' -- 26/08/04 16:33:33555
pHqghUmeAbMcBGKs'; waitfor delay '0:0:15' -- 26/08/04 16:33:38555
pHqghUmeg2IzLiYC'); waitfor delay '0:0:15' -- 26/08/04 16:35:08555
pHqghUmeToOSTpz8')); waitfor delay '0:0:15' -- 26/08/04 16:35:14555
pHqghUme4oUmTcCj' OR 840=(SELECT 840 FROM PG_SLEEP(15))-- 26/08/04 16:36:43555
pHqghUme6C9XgPJ5') OR 330=(SELECT 330 FROM PG_SLEEP(15))-- 26/08/04 16:36:49555
pHqghUme7WpubAju')) OR 634=(SELECT 634 FROM PG_SLEEP(15))-- 26/08/04 16:36:54555
pHqghUme'||DBMS_PIPE.RECEIVE_MESSAGE(CHR(98)||CHR(98)||CHR(98),15)||' 26/08/04 16:38:24555
pHqghUme'||DBMS_PIPE.RECEIVE_MESSAGE(CHR(98)||CHR(98)||CHR(98),18.806)||' 26/08/04 16:38:28555
pHqghUme 26/08/04 16:38:33555
pHqghUme'" 26/08/04 16:38:37555
pHqghUme????%2527%2522\'\" 26/08/04 16:38:42555
@@O3nee 26/08/04 16:40:11555
(select 198766*667891) 26/08/04 16:40:15555
@@O3nee 26/08/04 16:40:20555
@@O3nee 26/08/04 16:41:50555
-1' OR 3*2<5 or 'misXqFf7'=' 26/08/04 16:44:54555
-1' OR 3*2<5 or 'misXqFf7'=' 26/08/04 16:46:26555
-1' OR 5*5=26 or 'misXqFf7'=' 26/08/04 16:47:58555
-1' OR 5*5=26 or 'misXqFf7'=' 26/08/04 16:48:05555
pHqghUme 26/08/04 16:48:14(select 198766*667891)
pHqghUme 26/08/04 16:48:19(select 198766*667891)
pHqghUme 26/08/04 16:48:25(select 198766*667891)
-1' OR 5*5=25 or 'misXqFf7'=' 26/08/04 16:48:29555
pHqghUme 26/08/04 16:50:14@@ucpRq
pHqghUme 26/08/04 16:51:58@@ucpRq
-1 OR 3*2>5 26/08/04 16:56:25555
-1 OR 3*2>999 26/08/04 16:58:00555
-1 OR 3*2>5 26/08/04 16:58:06555
pHqghUme 26/08/04 16:58:15 -1) OR 926=(SELECT 926 FROM PG_SLEEP(31.035))--
-1 OR 3*2>999 26/08/04 17:00:05555
pHqghUme 26/08/04 17:00:10 -1 OR 513=(SELECT 513 FROM PG_SLEEP(31.035))--
pHqghUme 26/08/04 17:00:22 -1 OR 794=(SELECT 794 FROM PG_SLEEP(15))--
-1 OR 5*5=26 26/08/04 17:02:00555
-1 OR 5*5=26 26/08/04 17:03:39555
-1 OR 5*5=25 26/08/04 17:05:27555
-1 OR 5*5=25 26/08/04 17:07:05555
-1 OR 3*2>5 -- 26/08/04 17:07:10555
-1 OR 3*2>5 -- 26/08/04 17:09:01555
pHqghUme 26/08/04 17:09:15 jLO6eKMu'); waitfor delay '0:0:0' --
pHqghUme 26/08/04 17:09:20 Z0Aq7QQc'); waitfor delay '0:0:15' --
pHqghUme 26/08/04 17:09:29 o3kSaUze'); waitfor delay '0:0:15' --
pHqghUme 26/08/04 17:10:16 Sueczuxi'; waitfor delay '0:0:62.07' --
pHqghUme 26/08/04 17:10:21 H9VnuEl8'; waitfor delay '0:0:15' --
pHqghUme 26/08/04 17:14:06 -1)); waitfor delay '0:0:15' --
pHqghUme 26/08/04 17:18:57 -1); waitfor delay '0:0:31.035' --
pHqghUme 26/08/04 17:20:31555
pHqghUme 26/08/04 17:22:11555
pHqghUme 26/08/04 17:22:20555
pHqghUme 26/08/04 17:25:42555
pHqghUme 26/08/04 17:35:19-1' OR 177=177 or 'eq3AGwWP'='
pHqghUme 26/08/04 17:35:24-1' OR 177=177 or 'eq3AGwWP'='
pHqghUme 26/08/04 17:36:55-1' OR 177=177 or 'eq3AGwWP'='
pHqghUme 26/08/04 17:43:31555
pHqghUme 26/08/04 17:55:10
pHqghUme 26/08/04 18:01:15-1" OR 5*5=26 --
pHqghUme 26/08/04 18:01:21-1" OR 5*5=26 --
pHqghUme 26/08/04 18:04:23-1" OR 5*5=26 --
pHqghUme 26/08/04 18:20:40-1' OR 5*5=25 --
pHqghUme 26/08/04 18:22:19-1' OR 5*5=25 --
pHqghUme 26/08/04 18:22:25-1 OR 5*5=26
pHqghUme 26/08/04 18:23:59-1 OR 5*5=26
pHqghUme 26/08/04 18:25:32-1 OR 5*5=26
pHqghUme 26/08/04 18:35:54-1 OR 5*5=26 --
pHqghUme 26/08/04 18:38:54-1 OR 5*5=26 --
pHqghUme 26/08/04 18:49:16
pHqghUme 26/08/04 18:52:11
(select 198766*667891 from DUAL) 26/08/04 18:55:12
(select 198766*667891 from DUAL) 26/08/04 18:55:17
(select 198766*667891 from DUAL) 26/08/04 18:55:23
pHqghUme'" 26/08/04 18:56:58
pHqghUme'" 26/08/04 18:58:31
pHqghUme 26/08/04 19:00:02
pHqghUme 26/08/04 19:00:09
pHqghUme 26/08/04 19:08:58555
pHqghUme 26/08/04 19:09:09555
pHqghUme 26/08/04 19:09:15555
pHqghUme 26/08/04 19:12:10
pHqghUme 26/08/04 19:13:40
pHqghUme 26/08/04 19:15:09
pHqghUme 26/08/04 19:18:04
pHqghUme 26/08/04 19:20:59
pHqghUme 26/08/04 19:50:53
pHqghUme 26/08/04 19:52:23
pHqghUme 26/08/04 19:56:42
pHqghUme 26/08/04 19:56:48
pHqghUme 26/08/04 19:56:53

New Comment (max. 2048 characters, no HTML):

Name:
Comment:

This webpage © 2005-2019 by Bob Swart (aka Dr.Bob - www.drbob42.com). All Rights Reserved.