Hallo,
ich habe aktuell zwei Probleme.
1. Ich bin gerade dabei, per Button-procedure einen Graphen in das Image einer anderen
Unit zu zeichnen.
Form1.Image1.Canvas.Pixels[round((x*prop)+8), round(Image1.Height-9-(y*prop))]:=clblack;
Das ist die "zeichnende Befehlszeile". Könnt ihr mir sagen, woran es liegt?
Die
Unit ist auch eingebunden (und die Form heißt auch Form1):
Delphi-Quellcode:
implementation
uses Unit1;
2. Ich mache hier einen Timer, um zu überprüfen, ob eine Zahl zwischen 1 und 90 eingegeben wird. Jedoch erscheint "incompatible types" und
das then wird rot hinterlegt. Kann mir auch da jmd. helfen? Danke, wär supernett.
Delphi-Quellcode:
procedure TForm2.PruefTimer(Sender: TObject);
begin
if 0<StrToFloat(Winkel.text)<90
then
begin
Aussage.Color:=clRed;
Aussage.Caption:='Alle Eingaben sind korrekt';
end;
Schon mal großes Danke im Voraus!