AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi proceduren (Events) aus Interface
Thema durchsuchen
Ansicht
Themen-Optionen

proceduren (Events) aus Interface

Ein Thema von EWeiss · begonnen am 4. Sep 2016 · letzter Beitrag vom 12. Sep 2016
Antwort Antwort
EWeiss
(Gast)

n/a Beiträge
 
#1

AW: proceduren (Events) aus Interface

  Alt 6. Sep 2016, 22:50
Habe mir mal Deine Sourcen angeschaut.
Für das was Du erreichen willst benötigts Du kein Interface.
Dazu reicht eine function.
Habe das spasseshalber mal geändert, so das es funktioniert.
Schau es Dir mal an.
Doch ich brauche ein Interface weil meine DLL die TMagnetic enthalten soll so das ich diese nicht in jedem Projekt separat einbinden muss.
Das Problem das es beim mir nicht Funktioniert ist gerade der umbau zum Interface.

Hast du mal versucht wenn du nun mit der TMagnetic bsp.. 10 VCL Formen startest
die alle gegenseitig an die Parentform andocken und sich damit verschieben lassen.. das ganze noch funktioniert?

Danke für das reinschauen..

gruss

Geändert von EWeiss ( 7. Sep 2016 um 01:23 Uhr)
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#2

AW: proceduren (Events) aus Interface

  Alt 6. Sep 2016, 23:13
Mein Problem ist halt nur das du die TMAgnetic Formatiert hast..
Dadurch kann ich sie nicht vergleichen und die geänderten Funktionen identifizieren.

Was nicht geht das du die TMagnetic in der TMagnetic selbst erstellst.
Auch die setter und getter sollten von außen gesetzt werden.
Delphi-Quellcode:
  if MagneticWnd = nil then
    begin
      MagneticWnd := TMagnetic.Create;
      MagneticWnd.SnapWidth := 15;
    end;

  result := MagneticWnd.AddWindow(Handle, hWndParent)
Der Anwender soll festlegen ab welcher weite das Window andockt.
Hingegen der Ansatz die TSubClass_Proc umzuleiten sieht sehr gut aus.
Werde damit mal etwas experimentieren.

Danke!

EDIT:
Bin das jetzt nochmal durchgegangen habe die angesprochenen dinge zurück gesetzt.
Funktioniert ohne Interface recht gut. (Das ist aber mein Problem was ich noch ändern muss DLL bedingt).

Zitat:
Hast du mal versucht wenn du nun mit der TMagnetic bsp.. 10 VCL Formen startest
die alle gegenseitig an die Parentform andocken und sich damit verschieben lassen.. das ganze noch funktioniert?
Nach meinen Änderungen getestet und funktioniert noch.

EDIT2:
Interface implementiert und funktioniert jetzt alles.
Jetzt kann ich mein Spectragram Window mit ziehen und muss da nicht immer von Hand nachhelfen.

Danke für eure Hilfe.

gruss

Geändert von EWeiss (11. Jul 2019 um 15:44 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
10.022 Beiträge
 
Delphi 12 Athens
 
#3

AW: proceduren (Events) aus Interface

  Alt 7. Sep 2016, 04:20
Mein Problem ist halt nur das du die TMAgnetic Formatiert hast..
Dadurch kann ich sie nicht vergleichen und die geänderten Funktionen identifizieren.
Einer der Gründe weshalb ich empfehle grundsätzlich die eigenen Units von Zeit zu Zeit durch den integrierten Formatter zu jagen. Zum Vergleich kannst du das aber auch temporär machen und dann nur die Änderungen übernehmen.
Sebastian Jänicke
AppCentral
  Mit Zitat antworten Zitat
Benutzerbild von stahli
stahli

Registriert seit: 26. Nov 2003
Ort: Halle/Saale
4.358 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: proceduren (Events) aus Interface

  Alt 7. Sep 2016, 09:52
etwas OT: (werden die meisten eh wissen, aber vielleicht nicht jeder)

Word hat auch eine sehr gute Vergleichsfunktion (mit optional Leerzeichen und Leerzeilen ignorieren usw.).
Also wenn man Quelltexte nicht einheitlich formatieren kann und Word verfügbar hat ist das durchaus nutzbar.
Stahli
http://www.StahliSoft.de
---
"Jetzt muss ich seh´n, dass ich kein Denkfehler mach...!?" Dittsche (2004)
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
10.022 Beiträge
 
Delphi 12 Athens
 
#5

AW: proceduren (Events) aus Interface

  Alt 7. Sep 2016, 11:09
Da würde ich eher dieses Tool nehmen:
http://www.modelmakertools.com/struc...wer/index.html
Das analysiert den Quelltext und merkt auch, wenn Methoden nur verschoben sind usw., zeigt an welche hinzugekommen und geändert sind usw.
Sebastian Jänicke
AppCentral
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#6

AW: proceduren (Events) aus Interface

  Alt 7. Sep 2016, 11:38
Zitat:
Einer der Gründe weshalb ich empfehle grundsätzlich die eigenen Units von Zeit zu Zeit durch den integrierten Formatter zu jagen.
Das Problem ist dabei nur das jeder sein eigenes Süppchen kochen will.
Das war einer der gründe warum bei Mediaportal, als ich da noch mit gearbeitet habe, es strikte vorgaben gab bzg. Formatierung usw..

Zitat:
Da würde ich eher dieses Tool nehmen:
Sieht gut aus.
Aber der Integrierte UltraCompare von UltraEdit ist dafür für mich persönlich ausreichend.

gruss

Geändert von EWeiss ( 7. Sep 2016 um 11:45 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
10.022 Beiträge
 
Delphi 12 Athens
 
#7

AW: proceduren (Events) aus Interface

  Alt 7. Sep 2016, 11:47
Das Problem ist dabei nur das jeder sein eigenes Süppchen kochen will.
Eine Standardeinstellung ist dabei wirklich nicht mehr zeitgemäß:
Die Beschränkung auf 80 Zeichen pro Zeile. Das haben wir auf 130 eingestellt.

Ansonsten benutzen wir den Formatter fast auf Standard außer dass "Großschreibung von reservierten Wörtern und Direktiven" auf Kleinbuchstaben eingestellt ist.

Wenn man da natürlich noch viel mehr nicht dem Standard entsprechend einstellt, bringt das ganze nicht mehr so viel, das stimmt.
Sebastian Jänicke
AppCentral
  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 05:00 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz