InputBox в Delphi для ввода пароля

Что бы скрыть звездочками ввод в InputBox надо добавить маску #1 перед вторым параметром:
sPass := InputBox('Введите пароль', #1'Пароль:', '');

Вот ссылка на InputQuery, где описана данная фича, которая подходит и для InputBox. Если я правильно понял, то функционал был добавлен в версии XE.

ORA-39726 или как удалить колонку

Добавил в таблицу 2 новые колонки, а через время пересмотрел свое решение и понял, что они не нужны, и надо сделать по-другому. Пробую удалять и ... ошибка ORA-39726:
unsupported add/drop column operation on compressed tables

Лезу в гугл. Кайт и Бурлесон пишут, что надо делать так:
--помечаем колонки как неиспользуемые
alter table TBL_1 set unused column Column1;
alter table TBL_1 set unused column Column2;
--удаляем неиспользуемые колонки
alter table TBL_ROZ_SALES drop unused columns;

Судя по тому, что Том пишет, что при этой процедуре будет перезаписан весь сегмент, решил проводить операцию удаления колонок ночью. Весь процесс занял где-то минуту.

4wd robot arduino или машинка-конструктор с Китая

Заказал на алиэкспрессе вот такую машинку:

Собирал по мануалам и видео с интернета, гуглите "4wd robot arduino".
Первоначально собрал с сервоприводом и датчиком фиксации препятствий, который и был установлен на сервопривод. Код, который идет с видео сразу не работал, подкорректировал и все заработало:

	#include <Servo.h>
	Servo myservo;
	int enableA = 1;
	int pinA1 = 3;
	int pinA2 = 2;
	int servposnum = 0;
	int servpos = 0;
	int enableB = 6;
	int pinB1 = 5;
	int pinB2 = 4;
	#define trigPin 7
	#define echoPin 8
	void setup() {
	// put your setup code here, to run once:
	//configure pin modes for the drive motors
	pinMode (enableA, OUTPUT);
	pinMode (pinA1, OUTPUT);
	pinMode (pinA2, OUTPUT);
	pinMode (enableB, OUTPUT);
	pinMode (pinB1, OUTPUT);
	pinMode (pinB2, OUTPUT);
	//configure pin modes for the ultrasonci se3nsor
	pinMode(trigPin, OUTPUT);
	pinMode(echoPin, INPUT);
	//Servo pins
	myservo.attach(9);
	}
	void loop() {
	// put your main code here, to run repeatedly:
	car();
	avoid();
	}
	//Defining functions so it's more easy
	//motor functions
	void motorAforward() {
	digitalWrite (pinA1, HIGH);
	digitalWrite (pinA2, LOW);
	}
	void motorBforward() {
	digitalWrite (pinB1, LOW);
	digitalWrite (pinB2, HIGH);
	}
	void motorAbackward() {
	digitalWrite (pinA1, LOW);
	digitalWrite (pinA2, HIGH);
	}
	void motorBbackward() {
	digitalWrite (pinB1, HIGH);
	digitalWrite (pinB2, LOW);
	}
	void motorAstop() {
	digitalWrite (pinA1, HIGH);
	digitalWrite (pinA2, HIGH);
	}
	void motorBstop() {
	digitalWrite (pinB1, HIGH);
	digitalWrite (pinB2, HIGH);
	}
	void motorAcoast() {
	digitalWrite (pinA1, LOW);
	digitalWrite (pinA2, LOW);
	}
	void motorBcoast() {
	digitalWrite (pinB1, LOW);
	digitalWrite (pinB2, LOW);
	}
	void motorAon() {
	digitalWrite (enableA, HIGH);
	}
	void motorBon() {
	digitalWrite (enableB, HIGH);
	}
	void motorAoff() {
	digitalWrite (enableA, LOW);
	}
	void motorBoff() {
	digitalWrite (enableB, LOW);
	}
	// Movement functions
	void forward (int duration) {
	motorAforward();
	motorBforward();
	delay (duration);
	}
	void backward (int duration) {
	motorAbackward();
	motorBbackward();
	delay (duration);
	}
	void right (int duration) {
	motorAbackward();
	motorBforward();
	delay (duration);
	}
	void left (int duration) {
	motorAforward();
	motorBbackward();
	delay (duration);
	}
	void coast (int duration) {
	motorAcoast();
	motorBcoast();
	delay (duration);
	}
	void breakRobot (int duration) {
	motorAstop();
	motorBstop();
	delay (duration);
	}
	void disableMotors() {
	motorAoff();
	motorBoff();
	}
	void enableMotors() {
	motorAon();
	motorBon();
	}
	int distance() {
	int duration, distance;
	digitalWrite(trigPin, HIGH);
	delayMicroseconds(1000);
	digitalWrite(trigPin, LOW);
	duration = pulseIn(echoPin, HIGH);
	distance = (duration/2) / 29.1;
	return distance;
	}
	void car() {
	int distance_0;
	distance_0 = distance();
	while(distance_0 > 15)
	{
	if(servposnum == 0)
	{
	myservo.writeMicroseconds (1900);
	servposnum = 1;
	delay(100);
	}
	else if(servposnum == 1)
	{
	myservo.writeMicroseconds (2200);
	servposnum = 2;
	delay(100);
	}
	else if(servposnum == 2)
	{
	myservo.writeMicroseconds (1900);
	servposnum = 3;
	delay(100);
	}
	else if(servposnum == 3)
	{
	myservo.writeMicroseconds (1600);
	servposnum = 1;
	delay(100);
	}
	motorAon();
	motorBon();
	forward(1);
	distance_0 = distance();
	}
	breakRobot(0);
	}
	void avoid()
	{
	backward(500);
	right(360);
	}

view raw ultrasonic_sensor_4wd_robot_arduino hosted with ❤ by GitHub

Получилось вот так:

Поигрался и решил переделать на управление по блютузу, в комплекте идет модуль. Все подключил, программу написал:

	int enableA = 1;
	int pinA1 = 3;
	int pinA2 = 2;
	int enableB = 6;
	int pinB1 = 5;
	int pinB2 = 4;
	char state = '0';
	void setup() {
	//configure pin modes for the drive motors
	pinMode (enableA, OUTPUT);
	pinMode (pinA1, OUTPUT);
	pinMode (pinA2, OUTPUT);
	pinMode (enableB, OUTPUT);
	pinMode (pinB1, OUTPUT);
	pinMode (pinB2, OUTPUT);
	Serial.begin(9600); // Default connection rate for my BT module
	}
	void loop() {
	state = Serial.read();
	if (state == 'f') {
	forward(10);
	}
	else if (state == 'b') {
	backward(10);
	}
	else if (state == 'l') {
	left(10);
	}
	else if (state == 'r') {
	right(10);
	}
	else if (state == 's') {
	breakRobot(10);
	}
	else if (state == '1') {
	enableMotors();
	}
	else if (state == '0') {
	disableMotors();
	}
	}
	//motor functions
	void motorAforward() {
	digitalWrite (pinA1, HIGH);
	digitalWrite (pinA2, LOW);
	}
	void motorBforward() {
	digitalWrite (pinB1, LOW);
	digitalWrite (pinB2, HIGH);
	}
	void motorAbackward() {
	digitalWrite (pinA1, LOW);
	digitalWrite (pinA2, HIGH);
	}
	void motorBbackward() {
	digitalWrite (pinB1, HIGH);
	digitalWrite (pinB2, LOW);
	}
	void motorAstop() {
	digitalWrite (pinA1, HIGH);
	digitalWrite (pinA2, HIGH);
	}
	void motorBstop() {
	digitalWrite (pinB1, HIGH);
	digitalWrite (pinB2, HIGH);
	}
	void motorAon() {
	digitalWrite (enableA, HIGH);
	}
	void motorBon() {
	digitalWrite (enableB, HIGH);
	}
	void motorAoff() {
	digitalWrite (enableA, LOW);
	}
	void motorBoff() {
	digitalWrite (enableB, LOW);
	}
	// Movement functions
	void forward(int duration) {
	motorAforward();
	motorBforward();
	delay (duration);
	}
	void backward(int duration) {
	motorAbackward();
	motorBbackward();
	delay (duration);
	}
	void right(int duration) {
	motorAbackward();
	motorBforward();
	delay (duration);
	}
	void left(int duration) {
	motorAforward();
	motorBbackward();
	delay (duration);
	}
	void breakRobot(int duration) {
	motorAstop();
	motorBstop();
	delay (duration);
	}
	void disableMotors() {
	motorAoff();
	motorBoff();
	}
	void enableMotors() {
	motorAon();
	motorBon();
	}

view raw 4wd_robot_arduino_bluetooth hosted with ❤ by GitHub

и ... ардуино не воспринимает сигналы с телефона по блютузу, машинка не едет. Разбирался с проблемой пару часов, пока в комментариях кода, в одном из китайских примеров не увидел надпись:
Rx -> Tx
Tx -> Rx
А я подключал наоборот, думал, что если написано Rx, то надо и подключать к Rx =)
В общем, поменял контакты и все заработало.
Для управления с телефона использовал программу bluetooth spp pro.

Вот некоторые фотки процесса:

Вообще мне набор понравился, возможно 42 доллара это и много, но мне было интересно собирать "конструктор", познакомиться с Arduino и разбираться с возникнувшими проблемами.