Autor Beitrag
chickenfigt1989
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 444
Erhaltene Danke: 2



BeitragVerfasst: Sa 09.07.11 21:54 
Hallo
Wollt ein kleines Programm machen wo zwei bilder drauf sind und in einen bild sind 5 fehler.
Soweit so gut.
Dachte mir ich versteck einfach hinter jeden fehler ein kleines Panel das unsichtbar ist, und wen man auf den fehler klickt wird das onklick ereignis von panel ausgelöst das ein weiteres image das rote kreuz zum fehler markieren erscheint.
Nur klappt das nciht so
wie mach ich das am besten?
lg
Marc.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1876
Erhaltene Danke: 129

Win 8.1, Xubuntu 15.10

BeitragVerfasst: Sa 09.07.11 22:00 
Wofür der Workaround mit Panels? Du kennst doch bereits die Koordinaten und kannst diese mit der Position der Maus beim OnClick vergleichen, wobei ein gewisser Toleranzwert zulässig sein sollte. ;)
Deine Fehler sind dann beispielsweise entsprechende Objekte mit den Eigenschaften "Position" und "Found".
chickenfigt1989 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 444
Erhaltene Danke: 2



BeitragVerfasst: Sa 09.07.11 22:32 
hmm hört sich logisch an aber wie komm ich an die koordinaten :)
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8553
Erhaltene Danke: 479

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Sa 09.07.11 22:38 
Nimm das OnMouseDown-Event anstelle von OnClick. Da bekommt man die Koordinaten als Parameter mitgeliefert. ;-)

_________________
We are, we were and will not be.
chickenfigt1989 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 444
Erhaltene Danke: 2



BeitragVerfasst: Sa 09.07.11 22:57 
Ja aber wie und wo soll ich des jetzt machen?
steh grad voll aufm schlauch
chickenfigt1989 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 444
Erhaltene Danke: 2



BeitragVerfasst: Sa 09.07.11 23:23 
Hier mit dem kann ich die koordinaten des Bildes auslesen
Caption := Format('X %d Y %d', [X, Y]);
aber wie vergleich ich das nun?
glotzer
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 393
Erhaltene Danke: 49

Win 7
Lazarus
BeitragVerfasst: Sa 09.07.11 23:26 

_________________
ja, ich schreibe grundsätzlich alles klein und meine rechtschreibfehler sind absicht
chickenfigt1989 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 444
Erhaltene Danke: 2



BeitragVerfasst: Sa 09.07.11 23:43 
wie kann ich das onklick ereignis bei einer bestimmten koordinate auslösen?
FinnO
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 1331
Erhaltene Danke: 123

Mac OSX, Arch
TypeScript (Webstorm), Kotlin, Clojure (IDEA), Golang (VSCode)
BeitragVerfasst: Sa 09.07.11 23:47 
via mausklick.
chickenfigt1989 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 444
Erhaltene Danke: 2



BeitragVerfasst: Sa 09.07.11 23:50 
Habt ihr vllt für mich nen beispielcode?
BenBE
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 8721
Erhaltene Danke: 191

Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
BeitragVerfasst: Sa 09.07.11 23:52 
ausblenden Delphi-Quelltext
1:
2:
3:
4:
Procedure TGuttenbergForm.CopiedCodeMouseUp(Sender: TObject; X,Y: Integer);
begin
    Copy(Code, X, Y);
end;

_________________
Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.

Für diesen Beitrag haben gedankt: platzwart
chickenfigt1989 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 444
Erhaltene Danke: 2



BeitragVerfasst: Sa 09.07.11 23:59 
sehr witzig
kann mir jemand helfen bitte?
BenBE
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 8721
Erhaltene Danke: 191

Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
BeitragVerfasst: So 10.07.11 00:03 
Was verstehst Du an den Antworten der andern denn nicht?

Und NEIN, es wird hier KEINEN Source geben ;-)

_________________
Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.

Für diesen Beitrag haben gedankt: DonManfred
chickenfigt1989 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 444
Erhaltene Danke: 2



BeitragVerfasst: So 10.07.11 00:22 
Ich check einfach nicht wie ich die überprüfung amchen soll also wie soll cih das vergleichen
etwa so
if x:=100 and
y:=100 then
begin
Showmessage('Richtig');
end;

?
j.klugmann
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: So 10.07.11 00:28 
Du hast jetzt verschiedene Möglichkeiten:
* Trotz aller Anstrengungen mal eines dieser Seiten wie Google aufzusuchen oder gar die Foren-Suche zu benutzen.
* In die Delphi-Doku gucken.
* Es sein lassen.

Für diesen Beitrag haben gedankt: DonManfred
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: So 10.07.11 00:30 
Warum probierst du es nicht einfach aus? Kleiner Tipp:
ausblenden Delphi-Quelltext
1:
2:
if (x>90and (x<110then
// Treffer

sonst muss man den Punkt genau treffen und das wäre ziemlich schwer.
Delphi-Laie
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 1600
Erhaltene Danke: 232


Delphi 2 - RAD-Studio 10.1 Berlin
BeitragVerfasst: So 10.07.11 16:30 
user profile iconchickenfigt1989 hat folgendes geschrieben Zum zitierten Posting springen:
Ich check einfach nicht wie ich die überprüfung amchen soll also wie soll cih das vergleichen
etwa so
if x:=100 and
y:=100 then
begin
Showmessage('Richtig');
end;

?


Mir ist völlig schleierhaft, wie jemand, der schon über ein Jahr mit von der Delphipartie ist und zudem nahezu 400 Beiträge hier hineinsetzte, solch brachiale Anfängerfehler begehen kann.

Für diesen Beitrag haben gedankt: BenBE, DonManfred, jasocul