Forum: Programmieren allgemein
by DeddyH,
20. Feb 2015
Man muss die Threads ja nicht künstlich in die Länge ziehen, es gibt schon genug, wo seitenweise über Kleinigkeiten diskutiert wird.
Forum: Programmieren allgemein
by DeddyH,
20. Feb 2015
Also wenn schon, dann IMO eher so:
procedure TForm1.P_0_0MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
s: string;
c: char;
begin
s := P_0_0.Caption;
//Standard bei Leerstring setzen
if s <> '' then
Forum: Programmieren allgemein
by DeddyH,
20. Feb 2015
Bei mir funktioniert das. Ist der EventHandler auch dem Ereignis zugewiesen (Objektinspektor)?