Arkiv för "Coding" Category

Hur man skriver en wordpress plugin

Tisdagen den 28 oktober, 2008

Jag kommer att sammanfatta för mig själv på denna sida hur man skriver en WordPress plugin.

Min första sökning på Google

WordPress plugin Skelett Generator

Kul med Plugins gör vissa antaganden om filnamn och sökvägar till resurser.

Det förutsätter att din plugin-filen finns på: YOURBLOG / wp-content / plugins / wp_emarket / wp_emarket.php

Det förutsätter att din externa JavaScript-fil finns på: YOURBLOG / wp-content / plugins / wp_emarket / js / script.js

Ett exempel på en fungerande Plugin som verkar mycket enkelt

Skriv din egen plugin för Wordpress

En steg för steg för att producera plugins

Parallellport förare

Fredag, 24 oktober, 2008

Parallel Port Central - hänvisar till inpout.dll som jag brukade köra Input Output via parallellport på spegeln maskin projekt.

VB Visual Basic Modbus Checksumma rutin

Söndag, 12 oktober, 2008

Funktion CRC16_BIN (ByRef ModBus_Data () As Long, NumBytes As Integer) As Long

Dim temp så länge
Dim CRC så länge
Dim polynom så länge
Dim i As Integer
Dim j As Integer
"- Följande läses sekvens kontrollsumma kontroll vektorer - test där varken hej eller lo byte == 0
"- Exempel temperatur = 1: 1 3 64 0 1 217 144
"- Temperatur = 255: 1 3 64 0 255 88 16
"- Temperatur = 256: 1 3 64 1 0 25 192
"- Temperatur = 257: 1 3 64 1 1 216 0
"- = 0: 1 3 64 0 0 24 80
"- Kontrollerade skriva string = Chr (1) & Chr (6) & Chr (64) & Chr (3) & Chr (232) & Chr (24) & Chr (34)
CRC = 65535 "-bottom 16 bitar är alla 1: s
Polynom = 40961 "-poly = A001
För i = 0 till NumBytes - 1
CRC = CRC Xor ModBus_Data (i)
För j = 0 till 7
Om (CRC och 1) Då
CRC = (ShiftRight (CRC) Xor 40961)
Annan
CRC = ShiftRight (CRC)
End If
Nästa j
Nästa i
CRC16_BIN = CRC Och 65535

End Function

ZedGraph är ett kraftfullt alternativ till Visual Basic MSChart

Lördag, 11 oktober, 2008

Wikin för ZedGraph.

Visual Basic: Returnera en vektor från en funktion

Fredagen den 3 oktober, 2008

Hur man returnerar en array från en funktion

Förälder Form Funktion som går tillbaka en Array / Vector

Private Sub ReceiveArray_Click ()
Dim intRcvArray () As Integer
Dim i As Integer

UserInterface.Text = ""
intRcvArray = NumberList () "-get samlingen med strängar.

För i = LBound (intRcvArray) Att UBound (intRcvArray)-Visa strängar.
UserInterface.Text = UserInterface.Text & CStr (i) & ""
Nästa i

End Sub

Privat tillställning NumberList () As Integer () "- Den här funktionen returnerar en array
Dim intArray () As Integer
Dim i As Integer

ReDim intArray (1 till 10)
För i = 1 till 10
intArray (i) = i
Nästa i

NumberList = intArray
End Function

Kod här: ReturnArray.zip

Visual Basic: Hur man passera en array parameter till en annan rutin

Torsdagen den 2 oktober 2008
Denna rutin kommer att passera en parameter till en annan rutin Denna rutin tar emot samtalet med array som parameter

Sub TestPassArray ()

Dim LongArray (1 till 5) As Long
Dim i As Integer

För i = 1 till 5
LongArray (i) = i
Nästa i

UserDisplay.Text = CStr (PassTest (LongArray ()))

End Sub

Funktion PassTest (ByRef LongPass () As Long) As Long

Dim i As Integer
Dim Sum så länge

För i = 1 till 5
Summan = Summan + LongPass (i)
Nästa i

PassTest = Summan

End Function

  1. Det går rutinmässig förpackningar 1,2,3,4,5 i en matris.
  2. De kallas rutiner beräknar summan av alla värden i kedjan och skickar resultatet tillbaka till den uppringande rutin.

Visual Basic: Spara anpassade kontroll långlivade egenskaper

Torsdagen den 2 oktober 2008

Mer om detta ämne Google-sökning på VB Initproperties

property already has an Initialize event in common with Class modules and other objects, such as forms. Du kanske undrar varför vi behöver InitProperties händelse eftersom UserControl egendom redan har ett Initiera fall gemensamt med klass moduler och andra föremål, såsom blanketter.

event happens too often, that is, every time an instance or your control "wakes up." Anledningen till att vi behöver InitProperties att initiera standardvärden är att starta händelse inträffar alltför ofta, det vill säga varje gång en hand eller din kontroll "vaknar upp". Du vill bara ha den standard värden som krävs för när utvecklarna första Lägg till en ny kopia av din kontroll på en container. Efter att du vill att utvecklare ska kunna definiera bestående värden.

event, then you will have some very frustrated developers on your hands. VARNING - Använd inte Initiera Event till Ställ en ActiveX-kontroll förvalda värden: Om du sätter koden för att initiera objekt till standard i din anpassade ActiveX-kontroller: s Initiera händelse i stället för i InitProperties fall kommer du har några mycket frustrerade utvecklare på händerna. Din standardvärden åsidosätter de värden som exploatören har tilldelats vid utformning tid varje gång exploatören kör ett program som använder din kontroll.

--

object containing the values of your control’s custom, extender, and delegated properties. Fastigheten Bag är en ihållande UserControl föremål som innehåller värden av din kontroll anpassade, extender, och delegerade egenskaper. This means you can store property values in the Property Bag just before an instance of the UserControl is destroyed and then retrieve the stored values when a new instance of the UserControl "wakes up" in another part of the development life cycle. Faktum är att Fastighetsförmedling Bag är så ihållande att det inte får förstöras med instanser av UserControl. Det innebär att du kan lagra värden i Fastighetsförmedling Bag strax före en instans av UserControl förstörs och sedan hämta den lagrade värden när en ny instans av UserControl "vaknar upp" i en annan del av utvecklingen livscykel.

Fastigheten Bag har två metoder för att lagra och hämta värden respektive:

  • Den WriteProperty metod

  • Den ReadProperty metod

Du måste veta hur man kan manipulera Fastighetsförmedling väska i följande situationer som vi diskuterar i de avsnitt som följer på denna:

  • method in the WriteProperties event procedure. Du lagra värden i PropertyBag genom att ringa dess WriteProperty metod i WriteProperties händelse förfarande.

  • method in the ReadProperties event procedure. Du hämtar värden från PropertyBag genom att ringa dess ReadProperty metod i ReadProperties händelse förfarande.

  • method. Du se till att WriteProperties händelse kommer brand genom att ringa PropertyChanged metod. Du brukar göra detta i Fastighetsförmedling Låt förfaranden för dina egna egenskaper eller på andra lämpliga platser i din kod där lagringen värdet av en fastighet förändringar.

--

and WriteProperties events whenever it thinks that the instantiated object’s properties need to be re-initialized ( ReadProperties event fires) or stored for safekeeping ( WriteProperties event fires). Verksamhetsmiljön bränder en UserControl är ReadProperties och WriteProperties händelser när det anser att instantiated objektets egenskaper på nytt måste initieras (ReadProperties händelse bränder) eller lagras för förvaring (WriteProperties händelse bränder).

Detta arrangemang gör det mycket lättare för dig, kontroll författare, för att hantera dessa egenskaper eftersom du inte behöver tänka på alla möjliga tillfällen då värden kan behöva läsa eller skriva. event procedures. Du behöver helt enkelt att sätta kod för att läsa och skriva värden i två centrala platser: den ReadProperties och WriteProperties händelse förfaranden.

event procedures receive a single parameter named PropBag. This PropBag parameter obviously represents the Property Bag object that holds the UserControl ’s property values. Både ReadProperties och WriteProperties händelseprocedurer få en enda parameter som heter PropBag. Detta PropBag parameter uppenbarligen representerar Fastighetsförmedling Bag objekt som innehar den UserControl är värden.

parameter has one method for reading properties (ReadProperty) and another for writing properties (WriteProperty). Den PropertyBag objekt representeras av PropBag parameter har en metod för att läsa objekt (ReadProperty) och en annan för att skriva objekt (WriteProperty).

method so you can retrieve persistent values for individual properties. Vanligtvis är det enda nummer du behöver för att kunna skriva i ReadProperties händelse kommer att vara en serie samtal till ReadProperty metod så att du kan hämta bestående värden för enskilda fastigheter.

method so you can store persistent values of individual properties. Omvänt är det enda nummer du oftast behöver för att kunna skriva i WriteProperties händelse kommer att vara en serie samtal till WriteProperty metod så att du kan lagra beständiga värden av enskilda fastigheter.

--

event just before it fires the UserControl’ s Terminate event provided that at least one property value has changed. Visual Basic bränder den UserControl är WriteProperties händelse strax före det bränder den UserControl är Terminate händelse under förutsättning att minst ett fastighetsvärde har förändrats. Med andra ord, WriteProperties händelse bränder när den nuvarande instans av kontrollen är på väg att förstöras och alla värden som du vill kvar förändrats och därför behöver sparas.

Som namnet antyder kommer du använder WriteProperties händelse för att spara bestående värden. for each property whose value you wish to save. Den specifika mekanism som du använder för att spara värden är att ringa WriteProperty metod för Fastighetsförmedling Bag för varje objekt vars värde du vill spara. event as a parameter named PropBag. The example code in Listing 13.7 shows how you would call the Property Bag ’s WriteProperty method to save individual property values. Fastigheten Bag finns tillgänglig i händelse förfarande av WriteProperties händelse som en parameter vid namn PropBag. Exemplet koden i Lista 13.7 visar hur du skulle ringa Fastighetsförmedling Bag är WriteProperty metod för att spara enskilda värden. Observera att vi använder oavsett arkiv har lagring av egendom värde som källa för det aktuella värdet: ibland kan detta vara en privat minne rörlig, och vid andra tillfällen kan det vara en egenskap hos en konstituerande kontroll (som i sista raden innan den End Sub).


Med hjälp av WRITEPROPERTIES händelse förfarande för att rädda värden till egendom väska

Private Sub UserControl_WriteProperties (PropBag Som PropertyBag) "-Store värdena för de egna egenskaper till Fastighetsförmedling Bag
PropBag.WriteProperty "bakgrundsfärg", bakgrundsfärg
PropBag.WriteProperty "Celsius", m_Celsius
PropBag.WriteProperty "Fahrenheit", m_Fahrenheit
PropBag.WriteProperty "TemperatureDate", m_TemperatureDate
PropBag.WriteProperty "Caption", lblCaption.Caption
End Sub

--

events whenever it thinks you may need their services. Systemet automatiskt bränder den WriteProperties och ReadProperties händelser när den tror att du kan behöva deras tjänster. Att säkerställa att systemet känner en fastighet har förändrats, du måste ringa PropertyChanged metod. Ett exempel på detta skulle vara när du ändrar värdet på en privat variabel som omsätter värdet av en fastighet. Systemet kommer att ha någon möjlighet att veta att denna variabel är ansluten med en egendom, och därför kommer det inte att avskeda WriteProperties händelse som enbart grundar sig på de förändringar du har gjort.

I sådana fall kan du ringa PropertyChanged metod. Denna metod meddelar systemet att en viss egendom har förändrats och därför ser till att WriteProperties händelse kommer att branden innan den nuvarande instans av kontroll förstörs. Om du har skrivit rätt postnummer i WriteProperties xvent, sedan dina värden kommer att lagras i Fastighetsförmedling Bag.

method whenever you do something in code that will cause a change to a property whose value you wish to persist. Ring UserControl är PropertyChanged metod när du göra något i koden som kommer att orsaka en förändring till ett objekt vars värde du vill kvarstår. or Property Set procedure. Det mest typiska platsen för dig att ringa PropertyChanged metod skulle vara i en fastighet Låt eller egendom fastställt förfarande. Observera att vi kontrollera CanPropertyChange metod som vi diskuterar i "Ringer CanPropertyChange metod innan man tillåter en Fastighetsförmedling Värde för förändringar."

Ringer PropertyChanged metod för att säkerställa att WRITEPROPERTIES kommer brand

Fastighetsförmedling Låt Celsius (sValue Som Single)
Om CanPropertyChange ( "Celsius") Then '-tilldela inkommande värde som skall lagras i Privata variabel
m_Celsius = sValue
PropertyChanged ( "Celsius") "-åberopa UserControl: s PropertyChanged metod så att man vet att utlösa WriteProperties och lagra nytt värde
Slider1.Value = m_Celsius "-utföra andra hushållning är specifika för denna ansökan
RecalcFahrenheitFromCelsius sValue
DisplayTempsFromSlider
End If
Slutet Fastighetsförmedling

--

Den ReadProperties händelse bränder när en anpassad kontroll är reinstantiated någon gång i utvecklingscykel (projektet där det är bosatt har hämtats och dess behållare har instantiated, exploatören har just satt in körläge från design-läge, eller exploatören har bara återlämnas till design-läge från körläge).

Observera att vi sagt att ReadProperties bränder när den anpassade kontroll är nytt instantiated. event doesn’t fire. Vi använde denna formulering att avsiktligt utesluta fallet när exploatören lägger en instans av kontroll på dess behållare för första gången från Toolbox. För sådana första gången exemplifiering, den ReadProperties fall inte brand. Istället har InitProperties händelse bränder (se "Använda InitProperties Event Ange standardalternativ Startlista värden"). The Property Bag appears in the ReadProperties event procedure as a parameter named PropBag. You call PropBag’ s ReadProperty method for each property whose value you wish to restore. Den ReadProperties händelse, som namnet antyder, är den händelse som du kommer att använda för att återställa värdena på fastigheter som har hållits i Fastighetsförmedling Bag. Fastigheten Bag visas i ReadProperties händelse förfarande som en parameter vid namn PropBag. Kallar du PropBag " S ReadProperty metod för varje objekt vars värde du vill återställa.

. Observera att ReadProperty metod tar två argument: Namnet på den egendom som en sträng och sedan ett standardvärde för egendom (om egendomens värde inte har initierats i Fastighetsförmedling Bag).

Vi lagrar resultaten av varje ansökningsomgång till ReadProperties i lämplig variabel eller kontroll egendom som omsätter egendom inom denna kontroll.


Med hjälp av READPROPERTIES händelse förfarande för att återställa bestående värden från fastigheten väska

Private Sub UserControl_ReadProperties (PropBag som PropertyBag)
m_Celsius = PropBag.ReadProperty ( "Celsius", 30)
m_TemperatureDate = PropBag.ReadProperty _
( "TemperatureDate", DateSerial (1997, 1, 1))
m_caption = PropBag.ReadProperty ( "Caption", Extender.Name)
Bakgrundsfärg = PropBag.ReadProperty ( "bakgrundsfärg", Ambient.BackColor)
lblCaption.Caption = m_caption
End Sub

--

Att bryta den mentala dödläge utöva mer

Onsdagen den 1 oktober 2008

Den mest effektiva kodning som jag har hittat är att programmet i början på morgonen upp genom om 1pm på eftermiddagen. Efter att jag dricker 1 / 2 glas rött vin och börja dricka vatten för att tunna mitt blod som förberedelse för en 3 mil springa.

Jag har gjort minne tester före och under loppet. Jag bättre på att komma ihåg dunkla minnen av det förflutna efter övning.

En av orsakerna till detta kan vara hjärnan, precis som muskler, arbetar hårdare under ansträngande motion och är störst ökning av laktat, snarare än glukos. Du kan läsa mer om hjärnan med hjälp av laktat i den här artikeln.

Visual Basic PropertyBags att komma ihåg Parametrar-its i väskan

Måndagen den 29 september 2008

Erinrar om UserControl Egenskaper

Standard kontroller har egenskaper som du kan ställa in med hjälp av objektet webbläsare. Nästa gång du sätta upp ditt VB program för redigering du behöver för att kunna påminna om läget i dessa inställningar. Exempel # 3 på denna sida visar hur man använder en PropertyBag att minnas dessa inställningar.

Provryttare PropertyBag exempel

Lagring till Bag

Spara till säcken - Fyll upp det objekt som ska sparas till disk Stuff det i väskan - själva filen operation för att sätta på disk

Private Sub cmdSave_Click ()

Dim objBag som nya PropertyBag

Med objBag
. WriteProperty "Str", "En sträng"
. WriteProperty "Numerisk", 666
. WriteProperty "bool", False
. WriteProperty "Mascot", SuperBagMan.Picture

SaveBagContents. Contents App.Path & "\ Things.bag"
End With

Ställ objBag = Nothing

End Sub

Private Sub SaveBagContents (innehållet As Variant, FilePath som en sträng)

Dim FileNum As Integer

FileNum = FileSystem.FreeFile ()

Öppna FilePath för binära som FileNum
Sätt # FileNum,, Innehåll
Stäng FileNum

End Sub

Hämta från Bag

Tänk på väskan innehållet från disk Dumpa påsen - själva filen operation för att få innehållet från disk

Private Sub cmdLoadBag_Click ()

Dim objBag som nya PropertyBag
Dim TestInt As Integer

BagReadOut.Text = ""

Med objBag
. Innehållsförteckn = LoadBagContents (App.Path & "\ Things.bag")

Visa "Str =" &. ReadProperty ( "Str", "[nr värde]")
Visa "Numerisk =" &. ReadProperty ( "Numerisk", "[nr värde]")
Visa "bool =" &. ReadProperty ( "bool", "[nr värde]")
Visa "----------------"
Visa "Nästa värde avsiktligt slutade lagring listan och därför använder standardvärdet som anges i den. ReadProperty uttalande"
Visa "NotInBag =" &. ReadProperty ( "NotInBag", "[nr värde]")

Ställ Image1.Picture =. ReadProperty ( "Mascot", "[nr värde]")

TestInt = CInt (. ReadProperty ( "Numerisk", "[nr värde]"))

End With

Ställ objBag = Nothing

End Sub

Privat tillställning LoadBagContents (FilePath som String) As Variant

Dim FileNum As Integer
Dim tempContents som Variant

FileNum = FileSystem.FreeFile ()

Öppna FilePath för binära som FileNum
Få # FileNum,, tempContents
Stäng FileNum

LoadBagContents = tempContents

Hur man registrerar ett ocx Arkiv

Tisdagen den 9 september 2008

Om du får fel för en ocx-fil, registrera filen kan lösa problemet. För att registrera en ocx filen bara följa de enkla stegen nedan.

  • 1.Locate filen med Utforskaren eller Den här datorn. Alternativt söka efter filnamnet.
  • 2.Hold ned shift-tangenten och högerklicka på filen. Klicka sedan på "Öppna med ..." från menyn.
  • 3.An "Öppna med" dialogrutan ska visas. Klicka på knappen "Andra ...".
  • 4.Navigate till din windows \ system32 katalogen och välj filen "regsvr32.exe". Har en fil hämta det om du har problem med att lokalisera den exakta mapp. I Windows 2000 är det oftast ligger i C: \ WINNT \ System32. Klicka på Öppna för att välja filen. Klicka sedan på OK på "Öppna med" dialogrutan.
  • 5.You bör se ett meddelande som berättar filen var framgångsrikt registrerade. Om du ser ett felmeddelande, prova att starta om datorn och går igenom ovanstående igen.