Blog

200. Beitrag

Hallo Zusammen,

so schnell geht es…

Jahr vorbei, 200. Beitrag auf Suplanus und jede Menge zu tun.

Die Beliebtheit des Blogs ist im letzten Jahr enorm gestiegen, was wohl an der Erweiterung der Themengebiete liegt. Es freut mich sehr dass so viele von Euch täglich hier vorbeischauen.

Derzeit finde ich leider nur wenige freie Minuten um neue Beitrag zu verfassen, liegt wohl eher am Freizeitstress (Wintersaison). Als Schmankerl für euch habe ich die SetLanguageGui geschrieben  :cool:

Nochmals vielen Dank an alle Leser und ein erfolgreiches neues Jahr!

27132-1

Von |2013-01-09T12:38:00+01:002013-01-09|Allgemein|

SetLanguageGui

Anbei ein kleines Script um die Projektsprache komfortabel umzuschalten.

27-12-2012

Ich hatte erst versucht ein dynamisches Menü zu machen, leider funktioniert dies aufgrund der eingeschränkten Funktionalität in EPLAN nicht.

Die Auflistung zeigt nur die im Projekt eingestellten Sprachen.

 

 

SetLanguageGui (3241 Downloads )

 

[DeclareAction("SetLanguageGui")]
public void Function()
{
	SetLanguageGui frm = new SetLanguageGui();
	frm.ShowDialog();
	return;
}

private void SetLanguageGui_Load(object sender, System.EventArgs e)
{
	string ActionReturnParameterValue = string.Empty;

	// Languagelist
	oCLI.Execute("GetProjectLanguages", acc);
	acc.GetParameter("LANGUAGELIST", ref ActionReturnParameterValue);
	string[] ProjectLanguages = ActionReturnParameterValue.Split(';');

	// VariableLanguage
	oCLI.Execute("GetVariableLanguage", acc);
	acc.GetParameter("LANGUAGELIST", ref ActionReturnParameterValue);
	string VariableLanguage = ActionReturnParameterValue;

	// Add languages
	foreach (string CurrentLanguage in ProjectLanguages)
	{
		if (CurrentLanguage != "")
		{
			ListViewItem liviItem = new ListViewItem();

			// Check if current language
			if (CurrentLanguage.Equals(VariableLanguage))
			{
				liviItem.Selected = true;
			}

			liviItem.Text = CurrentLanguage;

			// LanguageMapping
			foreach(string line in EplanLanguageList)
			{
				if(line.StartsWith(CurrentLanguage))
				{
					if (line.Split(';').Length > 1) liviItem.SubItems.Add(line.Split(';')[1]);
				}
			}
			liviLanguages.Items.Add(liviItem);
		}
	}

	// Sort & resize
	liviLanguages.Sorting = SortOrder.Ascending;
	liviLanguages.Sort();
}

private void btnCancel_Click(object sender, EventArgs e)
{
	this.Close();
}

private void liviLanguages_MouseDoubleClick(object sender, MouseEventArgs e)
{
	SetLanguage();
}

private void btnOk_Click(object sender, EventArgs e)
{
	SetLanguage();
}

private void SetLanguage()
{
	if (liviLanguages.SelectedItems.Count > 0)
	{
		string CurrentLanguage = liviLanguages.SelectedItems[0].Text;

		// Bug
		//acc.AddParameter("varLANGUAGE", CurrentLanguage);
		//acc.AddParameter("dispLANGUAGE", CurrentLanguage);
		//oCLI.Execute("ChangeLanguage", acc);
		oCLI.Execute("ChangeLanguage /varLANGUAGE:" + CurrentLanguage + " /dispLANGUAGE:\"" + CurrentLanguage + ";\"");

		this.Close();
	}
	else
	{
		MessageBox.Show("Keine Sprache gewählt");
	}

}

 

Von |2017-11-09T12:23:45+01:002013-01-09|EPLAN, EPLAN-Scripts|

Snowboard Box

Es hätte viele Vorteile einen eigenen Funpark im Garten zu besitzen. Bei uns scheitert es aber meist am Schnee. Dennoch würde es schon Spaß machen am Sonntag bis zu jibben. Aus diesem Grunde hab ich mir eine kleine Box gebaut. Diese dient zum Grinden / Sliden.

 

 

Im Internet hab ich vergeblich nach Vorlagen gesucht, darum hier meine Erfahrungen und verwendeten Komponenten.

Zur Projektseite…

Von |2012-11-28T20:44:35+01:002012-11-28|Projekte|

Snowboard Bank

Wie ihr vielleicht über die Seite Über mich wisst, bin ich begeisterter Snowboardfahrer.

Über die Zeit sammeln sich doch einige Bretter an und beim Wiederverkauf bekommt man oft nicht viel dafür.

In Ratschings hab ich dann mal eine Bierbank gesehen auf der zwei Snowboards verschraubt waren (Sitzbank, Rücklehne). Dies gefiel mir von der Optik her sehr gut. Dennoch ist so eine Bierbank ein bisschen wackelig.

Da wir nach dem Urlaub viel Holz gemacht haben und darunter auch eine Birke war, habe ich diese so geschnitten, dass man Sie als Bank zusammenbauen kann:

  • Rundlinge (2x) als Füße mit V-Schnitt
  • Halbierter Stamm
Ging schnell und schaut schön aus :tongue:

Zur Projektseite…

Von |2017-04-06T07:46:46+02:002012-11-21|Projekte|
Nach oben