AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Zeitliche verschiebung bei einem Diagramm
Thema durchsuchen
Ansicht
Themen-Optionen

Zeitliche verschiebung bei einem Diagramm

Ein Thema von hedie · begonnen am 8. Jun 2010 · letzter Beitrag vom 8. Jun 2010
Antwort Antwort
hedie

Registriert seit: 12. Dez 2005
Ort: Schweiz
1.024 Beiträge
 
Delphi XE6 Starter
 
#1

Zeitliche verschiebung bei einem Diagramm

  Alt 8. Jun 2010, 20:04
Hallo liebe Community...

Ich versuche derzeit einen Logic Analyzer zu bauen... Hardware läuft nun alles jetzt ist die Software dran.

Ich habe bereits ein laufendes Programm mit demo daten befüllt... Siehe Anhang nr1
Ziel ist dieses Programm.

Mein problem ist, das ich bei der Version 1 leider nicht sauber programmiert habe und nun alle Zeitangaben Fix sind und
sich da nix ändern lässt.

Also habe ich bei Version 2 welche nun die Hardware Integriert neu begonnen.

Ich zeichne meine Linien wie folgt:

Delphi-Quellcode:
procedure TForm1.draw_raw_data(drawspace:TImage;color:TColor);
var
counter:integer;
vorheriges_x,aktuelle_flanke:integer;
begin

  counter := 1;
  repeat

    if (data[counter+1] <= stop) and (data[counter+1] >= start) then
    begin

    
    draw_up(drawspace,clBlack,(data[counter+1] div ein_pixel));
    if aktuelle_flanke = 1 then draw_line(drawspace,color,vorheriges_x,data[counter+1] div ein_pixel,5);
    if aktuelle_flanke = 0 then draw_line(drawspace,color,vorheriges_x,data[counter+1] div ein_pixel,25);

    aktuelle_flanke := data[counter];
    vorheriges_x := data[counter+1] div ein_pixel;

    end;

    counter := counter + 2;

  until data[counter] = 748575;
  if aktuelle_flanke = 1 then draw_line(drawspace,color,vorheriges_x,gesamt_einheit div ein_pixel,5);
  if aktuelle_flanke = 0 then draw_line(drawspace,color,vorheriges_x,gesamt_einheit div ein_pixel,25);

end;
Ich zeichne auf ein image (drawspace) die gesamt_einheit enspricht hier 50000
ein_pixel rechnet sich gesamt_einheit / image.widht

draw_up zeichnet mir einen senkrechten strich


Meine Frage nun:


Wie kann ich ein verschieben der Anzeige realisieren wie es in Anhang 1 der fall ist wenn man die scrollbars
betätigt (den unteren scrollbar hab ich bereits hinbekommen).


Danke schonmal
Angehängte Dateien
Dateityp: zip OpenLogic.zip (460,8 KB, 8x aufgerufen)
Claudio
Tu was du nicht lassen kannst
- http://endasmedia.ch

Geändert von hedie ( 8. Jun 2010 um 20:12 Uhr) Grund: Was vergessen :)
  Mit Zitat antworten Zitat
Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#2

AW: Denkblockade... Bitte mal schnell anstupsen :)

  Alt 8. Jun 2010, 20:05
Ändere doch mal deinen Thread-Titel. Kein Mensch weiß sonst, was du von einem willst
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#3

AW: Denkblockade... Bitte mal schnell anstupsen :)

  Alt 8. Jun 2010, 20:09
Auch noch mal von offizieller Seite - bitte ändere deinen Titel entsprechend den Forenregeln welchen du bei der Anmeldung zugestimmt hast.
Dein aktueller Titel sagt leider rein gar nichts über dein Problem aus wodurch später jemand mit gleichem Problem über die Suche nur schwer etwas finden wird was in diesem Thema gepostet wird.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
hedie

Registriert seit: 12. Dez 2005
Ort: Schweiz
1.024 Beiträge
 
Delphi XE6 Starter
 
#4

AW: Zeitliche verschiebung bei einem Diagramm

  Alt 8. Jun 2010, 20:12
gut... hab ich
Claudio
Tu was du nicht lassen kannst
- http://endasmedia.ch
  Mit Zitat antworten Zitat
hedie

Registriert seit: 12. Dez 2005
Ort: Schweiz
1.024 Beiträge
 
Delphi XE6 Starter
 
#5

AW: Zeitliche verschiebung bei einem Diagramm

  Alt 8. Jun 2010, 20:42
Danke... Problem hat sich gelöst
Claudio
Tu was du nicht lassen kannst
- http://endasmedia.ch
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:37 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz